用宏來完成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

　　⑤最後，執行宏即可完成逆序打印了。編程十分好用，但是也難理解。不得不說從事程序員是一項苦逼的差事。