在用代码生成excel报表时,想动态修改生成的报表sheet名称,不知道咋整,下面的代码不起作用Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim fl As String = ProjectPath & "Reports\出库单.xls"
Book.Build() '生成细节区
Book.Sheets(0).Rows.RemoveAt(0) '删除第一行,Excel报表的第一行通常是标记行
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet.Name = "<" & Tables("出库单").Current("月份") & ">" '写入打印条件
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()
[此贴子已经被作者于2023/8/30 9:10:16编辑过]