如何打印Excel成组工作表中的指定页?

如题所述

第1个回答  2020-02-23
Sub
打印()
Worksheets("sheet1").PrintOut
From:=1,
To:=2,
Copies:=1,
Collate
_
:=True
Worksheets("sheet2").PrintOut
From:=3,
To:=4,
Copies:=1,
Collate
_
:=True
End
Sub
以上就是一个示例宏,第一句是打印sheet1中的每1、2页,第二句就是打印sheet2中的第3、4页。你可以把括号中引号内中的sheet1等修改为相应的表名,把From
to
后面的数修改为相应的页数。如果要打的表还多,就这么多加几句也就行了。说明一下,这是用录制的宏改写的呀,其实你自己也可以试试的,没有多难的。
相似回答