Foxtable(狐表)用户栏目专家坐堂 → EXCEL报表打印问题


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

主题:EXCEL报表打印问题

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
EXCEL报表打印问题  发帖心情 Post By:2016/1/23 10:48:00 [只看该作者]

Dim Book As New XLS.Book(ProjectPath & "Attachments\生产任务.xls")
Book.Build()
Book.Save(ProjectPath & "Reports\生产任务.xls")
Dim Proc As New Process
Proc.File = ProjectPath & "Reports\生产任务.xls"
Proc.Start()

生产任务.xls文件中有模版1、模版2、模版3,我现在要打印模版1

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/23 11:06:00 [只看该作者]

生成报表后,删除 模版2、模版3的sheet


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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2016/1/23 11:28:00 [只看该作者]

模版1-3是其它报表要用的模版,以后可能还有模版4模版5...我想将模版放在1个文件里.
帮助中Book.Build(0)表示忽略第一个表,忽略多个表呢?如果有这样的参数就好了Book.Build("模版1")

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/23 11:38:00 [只看该作者]

 这样处理:Book.Build(0,2)
忽略生成第一个和第三个模板
再多模板这样
Book.Build(0,1,2,3,4,5,......) 

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2016/1/23 13:01:00 [只看该作者]

这样的话,以后再增加模板还要回过头来修改代码.
可能只能这样了

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2016/1/23 14:32:00 [只看该作者]

写配置,或者打印前弹窗口选择,然后赋值

类似
dim printnumber() as integer = {0,1,2,3}
Book.Build(printnumber

 回到顶部