装箱清单打印,修改录制的宏命令打印VB代码即可使用

装箱清单打印,修改录制的宏命令打印VB代码,录制任意宏,复制进去修改即可。此代码可以扩展到唛头打印,并设定对应唛头的打印分数,等等。

Sub 装箱清单()
'Excel 如何控制打印机打印次数-ExcelVBA程序开发-ExcelHome技术论坛 -
'源码来源: http://club.excelhome.net/thread-142335-2-1.html 本处添加注释。
'9/11/2014 14:41:31 +0800
' 装箱清单 宏
'建议将默认打印机设置为pdffactory,再次打印前请清空F列“已打印”
'假设装箱清单在装箱清单.xlsm的装箱清单表单的K12:Q43中,录制宏命令内容如下
Windows("装箱清单.xlsm").Activate '激活已经打开的要打印的文件
Sheets("装箱清单").Select '激活打印表格
Range("K12:Q43").Select '选择打印区域,打印时仅打印选定区域K12:Q43,从这里起可以重复设置不同的打印区域
Range("K12").Activate   '激活打印区域内任意单元格
Selection.PrintOut Copies:=1, Collate:=True  '设置打印分数为1,如打印多份,请修改为相应的数字
End Sub

Fr: https://weibo.com/p/1001603809090777307803

你可能感兴趣的:(装箱清单打印,修改录制的宏命令打印VB代码即可使用)