主题：[求助]EXCEL表基于模板导出及保存问题

Dim NewName As String

NewName = "Reports\出库单" & Format( Date.Today , "yyyyMMdd")& ".xls"

Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")

Dim fl As String = ProjectPath & NewName

Book.Build() '生成细节区

Book.Save(fl) '保存工作簿

Dim Proc As New Process '打开工作簿

Proc.File = fl

Proc.Start()