Foxtable(狐表)用户栏目专家坐堂 → EXCEL报表自动生成问题


  共有19138人关注过本帖树形打印复制链接

主题:EXCEL报表自动生成问题

帅哥哟,离线,有人找我吗?
abcdzabcdz
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:3807 威望:0 精华:0 注册:2008/9/1 7:34:00
EXCEL报表自动生成问题  发帖心情 Post By:2009/4/1 9:50:00 [只看该作者]

若一个FOXTABLE文件有9张表(表一,表二,.....表九),针对每个表设计了EXCEL报表模版,现将9个EXCEL报表模版合成一个EXCEL文件(123.EXCEL).每次打印时时,在"管理器"中设置好后,需全选FOXTABLE文件9张表,再点击"生成EXCEL报表",再选择相应文件,即完成所有操作.我要问的问题是:
能不能通过代码让FOXTABLE文件中所有表格处于全选状态,并使用模版文件直接生成"EXCEL报表"?

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/4/1 9:51:00 [只看该作者]

For each t as Table in Tables
      t.Select(0,0,t.rows.count-1,0)
next


 回到顶部
帅哥哟,离线,有人找我吗?
abcdzabcdz
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:324 积分:3807 威望:0 精华:0 注册:2008/9/1 7:34:00
  发帖心情 Post By:2009/4/1 10:27:00 [只看该作者]

能否代码调用模版文件直接生成"EXCEL报表"?



 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By: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
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57596 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By: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报表基本上面都有:
http://fox.egridsoft.com/dispbbs.asp?boardid=2&Id=2230&page=2


 回到顶部