Crystal Report导出报告为excel文件

Question

我在VB 2008中创建了一个水晶报表，它在Crystal Report Viewer中生成一个MS Access文件，并且我想将我的工作导出为水晶报表查看器作为excel文件。这可能吗？

Answer 1

我同意@Andrew有关MS Access文件，这不太合理。以下是一些示例代码，演示了如何将报告导出为.xls文件。代码（显然）分配给一个按钮。

Private Sub ButtonExport_Click(ByVal sender As System.Object, _ 
ByVal e As System.EventArgs) Handles Button2.Click 
    Try 
     Dim CrExportOptions As ExportOptions 
     Dim CrDiskFileDestinationOptions As New _ 
     DiskFileDestinationOptions() 
     Dim CrFormatTypeOptions As New ExcelFormatOptions 
     CrDiskFileDestinationOptions.DiskFileName = _ 
            "c:\crystalExport.xls" 
     CrExportOptions = cryRpt.ExportOptions 
     With CrExportOptions 
      .ExportDestinationType = ExportDestinationType.DiskFile 
      .ExportFormatType = ExportFormatType.Excel 
      .DestinationOptions = CrDiskFileDestinationOptions 
      .FormatOptions = CrFormatTypeOptions 
     End With 
     cryRpt.Export() 
    Catch ex As Exception 
     MsgBox(ex.ToString) 
    End Try 
End Sub 

你知道的CrystalReportViewer与出口按钮，可以导出到Excel，而无需任何额外的代码的工具栏。您可以在CrystalReportViewer属性中启用/禁用该按钮或使用如下代码：

<CR:CrystalReportViewer .... HasExportButton="true" ... />