上个教程相信大家都看过了,只设置了信息表调用问题,挺好用的吧,下面我说下如何设置宏,实现批量打印信息表。
一、设置好打印区域
二、设置好按钮
开发工具--插入---上下页按钮--拖动----邮寄图标--设置控件数值 --设置好--依次设置开始页,结束页。最后插入最后一个控件,名字为批量打印,看教程。
三、设置打印的宏
代码如下
Sub 批量打印()
For i = Range("F2") To Range("F3")
Range("E1") = i
ActiveSheet.PrintOut
Next
End Sub
说明F2,F3为打印开始页和结束页的单元格,E1为打印的序号
右击批量打印按钮--指定宏--选择”批量打印“--确定,我没打印机,我最后保存的是pdf文件。。
怎么样呢,学会了吗? 如果好用,别忘了加关注啊!有困难可以私信我啊,我一定改进!
閱讀更多 淡墨留餘香 的文章