以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- Excel报表输出时对选中的行筛选 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17890) |
-- 作者:飞 -- 发布时间:2012/3/28 9:19:00 -- Excel报表输出时对选中的行筛选 因为一些原因,必须要用Excel报表, 问一下关于excel报表的问题,帮助中说的设置打印范围貌似是针对整个表的,怎么才能使打印范围应用到选定的行 也就是怎么能对选定的行输出报表时候再筛选一下 有劳各位高手解答 |
-- 作者:yangming -- 发布时间:2012/3/28 9:35:00 -- EXCEL报表模板是针对整个表的,而在打印时如需打印选定行的话,需要在狐表中先进行筛选,然后再打印 |
-- 作者:飞 -- 发布时间:2012/3/28 9:44:00 -- 谢谢杨版,我后来还是用VBA实现了 |
-- 作者:狐狸爸爸 -- 发布时间:2012/3/28 9:50:00 -- 先遍历选定的行,获得每一行的主键值,合成一个条件: 主键 in (值1,值2,值3) 在Build之前,修改模板的条件: Dim Book As New XLS.Book(ProjectPath & "Attachments\\出库单.xls") \'打开模板 Dim Sheet As XLS.Sheet = Book.Sheets(0) Sheet(x,y).Value = 合成的条件 Book.Build() \'生成细节区 Book.Save("c:\\reports\\test.xls") \'保存工作簿 Dim Proc As New Process \'打开工作簿 Proc.File = "c:\\reports\\test.xls" Proc.Start() |