Foxtable(狐表)用户栏目专家坐堂 → 标签打印多份时如何如何实现顺序打印编号?


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

主题:标签打印多份时如何如何实现顺序打印编号?

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/18 15:15:00 [显示全部帖子]

什么打印?execl?专业报表?

截图举例说明一下

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/18 15:32:00 [显示全部帖子]

参考这种:http://www.foxtable.com/webhelp/topics/2626.htm

写代码处理,比如循环100次,然后更新模板里的编号内容

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/19 10:43:00 [显示全部帖子]

参考:http://www.foxtable.com/webhelp/topics/0225.htm

For i As Integer = 1 To 100
  
Dim Book As New XLS.Book(ProjectPath & "Attachments\报表模板\外购原料管理\散染毛包标签.xls")
Dim fl As String = ProjectPath & "Reports\散染毛包标签" & i & ".xls"
Sheet(11,0).Value = i
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Verb = "Print"
Proc.Start()
Next

 回到顶部