以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=175712)

--  作者:boomstar
--  发布时间:2022/3/16 10:14:00
--  [求助]

Dim Book As New XLS.Book(ProjectPath & "Attachments\\订单.xls"\'打开模板
Dim 
Sheet As XLS.Sheet = Book.Sheets(0)
Sheet
(3,9).Value = "<用户名 = 张三>"  \'写入打印条件
Book.Build() 
\'生成报表
Book.
SaveAs("d:\\张三.xls")

我的数据有很多个用户名,如何利用模板批量操作,以每个用户名生成报表,再以用户名为文件名单存一个XLS文件。


--  作者:有点蓝
--  发布时间:2022/3/16 10:34:00
--  
请不要发重复的问题:http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=175711