①啟動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
⑤最後,執行宏即可完成逆序列印了。程式設計十分好用,但是也難理解。不得不說從事程式設計師是一項苦逼的差事。