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

 　　①启动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

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