用代码设置一下试试。
Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")Dim fl As String = ProjectPath & "Reports\出库单.xls"Book.MergeFree = FalseBook.Build() '生成细节区Book.Save(fl) '保存工作簿