Excel ExportOptions vb.net 2水晶报告8.5 -没有效果

Question

我正在尝试用CRAXDRT.dll导出excel文件

代码如下:

将frmFormat设置为新的frmFormatOptionsfrmFormat.ShowDialog ()

            If frmFormat.okPressed Then
                If frmFormat.excelVersion = 7 Then
                    report.ExportOptions.FormatType = CRExportFormatType.crEFTExcel70
                ElseIf frmFormat.excelVersion = 8 Then
                    report.ExportOptions.FormatType = CRExportFormatType.crEFTExcel80
                End If
                report.ExportOptions.ExcelUseConstantColumnWidth = frmFormat.constantColumnWidth
                If frmFormat.constantColumnWidth Then
                    report.ExportOptions.ExcelConstantColumnWidth = frmFormat.columnWidth
                End If
                report.ExportOptions.ExcelUseTabularFormat = frmFormat.useTabular
                report.ExportOptions.ExcelUseWorksheetFunctions = frmFormat.worksheetFunctions
                report.ExportOptions.ExcelTabHasColumnHeadings = frmFormat.columnHeadings



            Else
                report.ExportOptions.FormatType = CRExportFormatType.crEFTExcel80
            End If
            report.ExportOptions.DestinationType = CRExportDestinationType.crEDTDiskFile
            report.ExportOptions.DiskFileName = rptxls
            'report.ExportOptions..PDFExportAllPages = True
            report.Export(False)

但是无论表单返回什么，formatoptions都不会生效。有线索吗?

Answer 1

report.ExportOptions.FormatType = CRExportFormatType.crEFTExcel80Tabular