Foxtable(狐表)用户栏目专家坐堂 → 多张报表一次生成


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

主题:多张报表一次生成

美女呀,离线,留言给我吧!
朱女士
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:445 积分:3633 威望:0 精华:0 注册:2020/2/8 11:14:00
多张报表一次生成  发帖心情 Post By:2024/4/25 15:58:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产计划表.xls

老师您好!
  我有一个报表,由两个数据表生成,上半部分生产计划明细表中一条记录的内容,下半部分是工艺流程卡的所有记录内容。我的目的是让每一条记录生成一张报表,且一次生成,成批打印。能否实现,怎么实现?谢谢指教!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产工艺加工流程卡模板.xls







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


加好友 发短信
等级:超级版主 帖子:106603 积分:542186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/4/25 16:42:00 [只看该作者]

那要使用代码处理,去掉模板里的all标记,按关联表的方式设计模板

然后代码大概参考

for each r as row in tables("生产计划明细表").rows
tables("生产计划明细表").position = r.index
Dim Book As New XLS.Book(ProjectPath & "Attachments\某模板.xls")
Dim
 fl As String = ProjectPath & "Reports\" & r("某编号列") & ".xls"
Book
.Build() '生成细节区
Book
.Save(fl)
next

 回到顶部