详细错误信息： 无法在流的结尾之外进行读取
Dim Book As New XLS.Book (ProjectPath & "Attachments\模板单.xls")
Book.Build() '生成细节区
Dim Sheet As XLS.Sheet
Sheet = Book.Sheets(0)
Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter = "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then
'Book.Save(dlg.FileName) '保存工作簿
MessageBox.Show("你要保存为：" & dlg.FileName, "提示") '提示用户选择的文件
Dim Proc As New Process
Proc.File = dlg.FileName
Proc.Start()
End If
这个代码不知道哪里遇到错误
详细错误信息：
无法使用本格式保存该工作簿，至少一个表单包含太多的列。