如何连续打印excel表格内的不同工作表的指定页数?

Question

例如：连续打印sheet1第二页、sheet2第二页、sheet3第二页···

Answer 1

录制一个宏能够做到“打印sheet1第二页”，复制相关代码并修改sheet1为sheet2,...运行代码。追问

这个宏怎么写？

追答

Sub Macro1()
Sheets("sheet1").PrintOut From:=2, To:=2
Sheets("sheet2").PrintOut From:=2, To:=2
Sheets("sheet3").PrintOut From:=2, To:=2
End Sub