用下面的代码生成Excel报表出现错误
Dim Book As New XLS.Book(ProjectPath & "Attachments\收文明细.xls")
Dim Sheet As XLS.Sheet
Book.Build()
Sheet = Book.Sheets(0)
Dim Style As XLS.Style = Book.NewStyle()
style.WordWrap = True '自动换行
Book.Save(ProjectPath & "reports\test2.xls")
Dim tmp As String = ProjectPath & "reports\test2.xls"
Dim rpt As String = ProjectPath & "Reports\test2.pdf"
Dim Book1 As New XLS.Book(tmp)
Book1.Build()
Book1.SaveToPDF(rpt) '保存为pdf文件
Dim Proc As New Process
Proc.File = ProjectPath & "reports\test1.pdf"
Proc.Start()
出现下面的错误:
此主题相关图片如下:excel报表错误.png
[此贴子已经被作者于2014-10-23 20:23:52编辑过]