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

2016-10-15 08:26:54 來源：word聯(lián)盟作者：3lian10 人氣： 次閱讀 276 條評論

①啟動Excel表格，單擊視圖--宏--錄制宏。②宏名可以自己隨意定，但為了正規(guī)，一般都采用英文命名法，ReversePrint。③命名之后，返回主界面，按ALT+F8快捷鍵打開宏管理界面，選擇ReversePrint，單擊編輯按鈕。④下...

　?、賳?a href=/office/excel/ target=_blank class=infotextkey>excel表格，單擊視圖--宏--錄制宏。

用宏來完成Excel2007工作表的逆序打印 三聯(lián)

　?、诤昝梢宰约弘S意定，但為了正規(guī)，一般都采用英文命名法，ReversePrint。

輸入宏名

　?、勖螅祷刂鹘缑?，按ALT+F8快捷鍵打開宏管理界面，選擇ReversePrint，單擊編輯按鈕。

編輯宏

　?、芟旅?，我以我以往的編程經(jīng)驗，提供大家下面的代碼，大家只需要將其替換原先的代碼即可。

替換代碼

　　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

　?、葑詈?，執(zhí)行宏即可完成逆序打印了。編程十分好用，但是也難理解。不得不說從事程序員是一項苦逼的差事。