我测试代码没问题,你请单独测试下面代码,然后测试。
Dim Book As New XLS.Book(ProjectPath & "Attachments\123.xls")Dim fl As String = ProjectPath & "Reports\123.pdf"Book.Build() '生成细节区book.SaveToPDF(fl)