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


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

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

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


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
标签打印多份时如何如何实现顺序打印编号?  发帖心情 Post By:2022/3/18 15:13:00 [显示全部帖子]

哪位老师指导一下,一个标签打印多份时如何如何实现顺序打印编号,就比如说一个标签需要打印100份,第一份的编号为85,第二份为86,第三份是87……?谢谢!

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


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
  发帖心情 Post By:2022/3/18 15:16:00 [显示全部帖子]

蓝老师,是用模板生成的execl报表
[此贴子已经被作者于2022/3/18 15:18:51编辑过]

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


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
  发帖心情 Post By:2022/3/18 15:20:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:散染毛包标签.zip


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


加好友 发短信
等级:小狐 帖子:380 积分:3515 威望:0 精华:0 注册:2017/9/5 8:28:00
  发帖心情 Post By:2022/3/19 9:44:00 [显示全部帖子]

蓝老师,我是用的默认的打印代码,您说的循环100次应该怎么循环?我的批量打印的标签内容是一样的,就是想增加一个顺序编号实现类似自动打码机的功能,?
想了半天没想到应该怎么写循环,麻烦您再详细指导一下,
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自动打码机.zip

Dim Book As New XLS.Book(ProjectPath & "Attachments\报表模板\外购原料管理\散染毛包标签.xls")
Dim fl As String = ProjectPath & "Reports\散染毛包标签.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()



 回到顶部