首先准备一个工作簿,里面2个工作表(数据库、审核单) 数据表 这是信息表 h1是序号 I1是开始打印号 I2是结束号 然后按开发工具--插入--表单中第一个按钮--拖出一个按钮 在按钮上右击--指定宏--- 点编辑--- 弹出vb窗口中输入 输入代码如下: Sub 按钮8_Click() For i = Range('I1') To Range('I2') Range('H1') = i ActiveSheet.PrintOut Next End Sub 输完后,单击按钮,就可以批量打印了。我电脑没接打印机,只能输出pdf文件了。 好用加关注吧,谢谢您的支持 |
|