乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > <em>Excel宏</em>,如何实现自动<em>打印</em>功能?

<em>Excel宏</em>,如何实现自动<em>打印</em>功能?

作者:乔山办公网日期:

返回目录:excel表格制作


当然可以了,你可以先录制一个宏,然后再研究下里面的代码。
在Excel帮助中也有很详细的说明,你可以自己找下。
要有自学的能力,要学会站在巨人的肩膀上,不能只要鱼,而是只要渔。

Excel和word一起有邮件合并打印功能,单独的Excel没有zd,我们可以换一个方式:
建立2个表格,一个存数据,另一个根据需要设计成绩单,奖状等样式,2个表格用一个编号联系,用vlookup功能,把需要的数据导入,然后根据编号打印即可,如果不想显示编号,可以把编号字体改成白色。我经常这样用,很方便。
有报酬的话我给你实现

插入模块
把如下代码复制进去。"sheet1"是工作表名,根据实际修改。复制好代码后在表中插入一个按钮,右键点击按钮---指定宏----选择这个打印宏。
Sub 打印()
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Call dy
End Sub
Sub dy()
Dim a%, b$, c$, abc$
a = Sheets("sheet1").Cells(3, 1).Value
b = Sheets("sheet1").Cells(5, 1).Value
If a < b Then
a = a + 1
Sheets("sheet1").Cells(3, 1).Value = a
Call 打印
End If
End Sub
Private Sub CommandButton1_Click()
Call 打印
End Sub

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网