Dim Book As New XLS.Book(ProjectPath & "Attachments\\配料中心物料配套报表.xls") \'打开模板
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim filepath = "D:\\reports\\" & _username & "配料中心物料配套报表.xls"
Book.Build() \'生成细节区
Book.Save(filepath)\'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = filepath
Proc.Start()