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


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

主题:多张报表一次生成

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


加好友 发短信
等级:超级版主 帖子:110813 积分:564003 威望: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

 回到顶部