Hi

Thanks for Your reply..

I am trying with your suggestion but its still showing the same error and the path is below...

 Friend Sub ExportToExcel()
        Dim path As String
        Dim LOGON32_LOGON_INTERACTIVE As Integer = 2
        Dim LOGON32_PROVIDER_DEFAULT As Integer = 0
        path = GetUniqueFileName()
        Utils.CheckAndCreateFolders(path)
        UnhideColumns()
        'ClearAllFilters()
        Dim officeVersion As String = Utils.GetOfficeVersion()
        If officeVersion = BCConstants.OFFICE_VERSION_2010_14 Then
            costEstimateFpSpread.SaveExcel(path, FarPoint.Excel.ExcelSaveFlags.UseOOXMLFormat Or FarPoint.Excel.ExcelSaveFlags.SaveCustomColumnHeaders)
        Else
            costEstimateFpSpread.SaveExcel(path, FarPoint.Win.Spread.Model.IncludeHeaders.ColumnHeadersCustomOnly)

        End If
        HideColumns()
        OpenAndUnlockExcel(path)

    End Sub

Regrads,

Naresh.Pydi