build以后，打开报表，把报表的sheet剪切到某一个excel文件里面即可
Dim Book1 As New XLS.Book("C:\001.xls")Dim Book2 As New XLS.Book("C:\002.xls")Dim Sheet = Book1.Sheets("订单")Book1.Sheets.Remove(Sheet)Book2.Sheets.Add(Sheet)Book1.Save("C:\001.xls")Book2.Save("C:\002.xls")
加好友 
发短信
Post By：2016/6/17 11:22:00 [显示全部帖子]
