作者:乔山办公网日期:
返回目录:excel表格制作
用VBA可以实现
搞个自动打印!
你要打印的数据如何来我不管,而且当前表格打百印只一页也就是打印一次(不能一次打印度几页,如果是,也只能用一个流水号)。
第一步 在VBE窗口插入模块,粘贴如下代码:
Sub 打印()
Application.ScreenUpdating = False '关闭屏知幕刷新
Range("B3:F14").PrintOut Copies:=1 '打印表中B3:F14区域打印1份
[D3] = [D3] + 1 '流水号累加1
Application.ScreenUpdating = False '关闭屏幕刷新
End Sub
第二步 “编辑/工具栏/窗体”,单击“按钮”后在当前工作表中合适地方画一个矩道形按钮,在自动打开的“指定宏”列表中选择“打印”,再把按钮输入名称“打印”。版
第三步 操作打印。单击按钮“打印”,则打印选定的表格,在D3单元格中的流水号自动累权加1
注意:打印区域修改成自己实际的打印区域哦!
不妨试试,无非就是多浪费几张纸而已呵呵。
不能自动连续生成。
流水号的填充方法:
1、将连续的两个单元格序号刷黑,按住右下角实心十字,双击实现自动填充。
2、编辑——填充——序列填充——列填充——步长1——终止号(选定)——确定。
用邮件合并解决。