以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- EXCEL报表自动生成问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=2252) |
-- 作者:abcdzabcdz -- 发布时间:2009/4/1 9:50:00 -- EXCEL报表自动生成问题 若一个FOXTABLE文件有9张表(表一,表二,.....表九),针对每个表设计了EXCEL报表模版,现将9个EXCEL报表模版合成一个EXCEL文件(123.EXCEL).每次打印时时,在"管理器"中设置好后,需全选FOXTABLE文件9张表,再点击"生成EXCEL报表",再选择相应文件,即完成所有操作.我要问的问题是: 能不能通过代码让FOXTABLE文件中所有表格处于全选状态,并使用模版文件直接生成"EXCEL报表"? |
-- 作者:狐狸爸爸 -- 发布时间:2009/4/1 9:51:00 -- For each t as Table in Tables |
-- 作者:abcdzabcdz -- 发布时间:2009/4/1 10:27:00 -- 能否代码调用模版文件直接生成"EXCEL报表"? |
-- 作者:狐狸爸爸 -- 发布时间:2009/4/1 10:37:00 -- For each t as Table in Tables t.Select(0,0,t.rows.count-1,0) next Dim Book As New XLS.Book(ProjectPath & "Attachments\\test.xls") \'打开模板 Book.Build() \'生成细节区 Book.Save(ProjectPath & "Reports\\test.xls") \'保存工作簿 Dim Proc As New Process \'打开工作簿 Proc.File = ProjectPath & "Reports\\test.xls" Proc.Start() |
-- 作者:blackzhu -- 发布时间:2009/4/1 15:38:00 -- 以下是引用abcdzabcdz在2009-4-1 9:50:00的发言:
若一个FOXTABLE文件有9张表(表一,表二,.....表九),针对每个表设计了EXCEL报表模版,现将9个EXCEL报表模版合成一个EXCEL文件(123.EXCEL).每次打印时时,在"管理器"中设置好后,需全选FOXTABLE文件9张表,再点击"生成EXCEL报表",再选择相应文件,即完成所有操作.我要问的问题是: 能不能通过代码让FOXTABLE文件中所有表格处于全选状态,并使用模版文件直接生成"EXCEL报表"? 关于打印,看如下的贴子,你要问的自动生成EXCEL报表基本上面都有: |