以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  多张报表一次生成  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=191609)

--  作者:朱女士
--  发布时间:2024/4/25 15:58:00
--  多张报表一次生成
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:生产计划表.xls

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







--  作者:有点蓝
--  发布时间: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