一、求教excel利用宏自动打印问题
插入模块
把如下代码复制进去。"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
二、excel怎么用宏实现选择打印工作表
示例：
Sub 打印第二个工作表()
Worksheets("sheet2").PrintOut From:=1, To:=1, Copies:=1, Collate _
:=True
End Sub
说明：
("sheet2")这是第二个工作表， From:=1, To:=1打印从第1页到第1页，Copies:=1份数为1.
可以按照这个方式自己编排。编好后运行宏就行了！
如果没问题请采纳，谢谢！
