用宏来完成Excel2007工作表的逆序打印

王朝学院·作者佚名  2016-08-07
窄屏简体版  字體: 小  |  中  |  大  |  超大  

①启动Excel表格,单击视图--宏--录制宏。

②宏名可以自己随意定,但为了正规,一般都采用英文命名法,ReversePRint。

③命名之后,返回主界面,按ALT+F8快捷键打开宏管理界面,选择ReversePrint,单击编辑按钮。

④下面,我以我以往的编程经验,提供大家下面的代码,大家只需要将其替换原先的代码即可。

Sub ReversePrint()

Dim NumPages As Long, Page As Long

NumPages = ExecuteExcel4Macro("GET.DOCUMENT(50)")

For Page = NumPages To 1 Step -1

ActiveSheet.PrintOut from:=Page, To:=Page

Next Page

End Sub

⑤最后,执行宏即可完成逆序打印了。编程十分好用,但是也难理解。不得不说从事程序员是一项苦逼的差事。

 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
© 2005- 王朝網路 版權所有 導航