Foxtable(狐表)用户栏目专家坐堂 → 有办法有代码设置报表打印次序吗?


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

主题:有办法有代码设置报表打印次序吗?

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


加好友 发短信
等级:一尾狐 帖子:476 积分:4039 威望:0 精华:0 注册:2011/11/2 8:55:00
有办法有代码设置报表打印次序吗?  发帖心情 Post By:2015/6/22 14:28:00 [只看该作者]

请问老师:
假设我有如下两张表
表a
次序 部门
1     劳保部
2     人事部
3     保卫部

表b
姓名  工号   部门
张三  1001 劳保部
……
王五  1023 劳保部
李四  2001 人事部
……
赵六  2045 人事部
钱八  3001 保卫部
……
杜十  3034 保卫部

我要对表b打印excel报表,内容是职工名单
现在希望能用代码设置,根据表a的次序,一个部门的职工名单报表生成一个文档,并输出为pdf格式保存
只用一键,代码自动就按照表a的次序,将各部门的职工名单报表生成并保存在指定文件夹(或狐表的输出文件夹里)

不知道这个设想,有可能实现吗?

求老师指点,十分感谢!

 

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2015/6/22 14:41:00 [只看该作者]

关联打印,不需要写代码:


图片点击可在新窗口打开查看此主题相关图片如下:预览.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:设计.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:九尾狐 帖子:2193 积分:13908 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2015/6/22 14:54:00 [只看该作者]

可以 用循环

Dim V1 As List(Of String)=DataTables("部门表").GetUniqueValues("","部门")
For Each sjbm As String In V1
Tables("职工名单表").Filter="部门 ='" &sjbm &"'" 
.
.
.
.
.


next




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


加好友 发短信
等级:一尾狐 帖子:476 积分:4039 威望:0 精华:0 注册:2011/11/2 8:55:00
  发帖心情 Post By:2015/6/22 18:00:00 [只看该作者]

请问:这个是专业报表吗?我在帮助文档中没有找到,能提供地址吗谢谢~!


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


加好友 发短信
等级:一尾狐 帖子:431 积分:3214 威望:0 精华:2 注册:2011/9/10 21:35:00
  发帖心情 Post By:2015/6/22 22:03:00 [只看该作者]

表B增加一个辅助列,根据部门填入序号,最后排序一下


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


加好友 发短信
等级:一尾狐 帖子:476 积分:4039 威望:0 精华:0 注册:2011/11/2 8:55:00
  发帖心情 Post By:2015/6/23 1:29:00 [只看该作者]

谢谢您!但感觉还是不太懂,能请您提供下帮助文档的位置,或者详细教我一下吗?非常感谢您!

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


加好友 发短信
等级:一尾狐 帖子:476 积分:4039 威望:0 精华:0 注册:2011/11/2 8:55:00
  发帖心情 Post By:2015/6/23 1:32:00 [只看该作者]

试用了一下,可以按表B分开在一个报表里。但我如何按表b分开在多个报表中呢?求您指点!
此外,如果我要对报表设置分页符,且对表a的数据进行筛选后生成报表,应该怎么解决呢?

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


加好友 发短信
等级:九尾狐 帖子:2193 积分:13908 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2015/6/23 2:11:00 [只看该作者]

1分页符可以在报表模版中设置;
2表a筛选生成报表 用filter


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/6/23 11:56:00 [只看该作者]

 1、表A表B建立关联;

 

 2、在表B引用表A的次序列;

 

 3、根据表B设置报表,excel报表那里设置排序

 

http://www.foxtable.com/help/topics/1805.htm

 

http://www.foxtable.com/help/topics/1397.htm

 

 


 回到顶部