如何編輯Excel宏命令雙面打印Excel2003表格？

在Word2003的&lduo;打印&rduo;對(duì)話框中可以方便地設(shè)置雙面打印Word文檔，但是在Excle2003中則沒有雙面打印的設(shè)置選項(xiàng)。用戶可以通過在Excel2003中編輯宏命令實(shí)現(xiàn)雙面打印Excel2003表格。

1．編輯Excel2003宏命令
在Excel2003中*次使用宏功能時(shí)，需要添加&lduo;個(gè)人宏工作簿&rduo;（即），然后再使用Visual Basic編輯器編輯雙面打印的宏命令。操作步驟如下所述:
第1步，打開Excel2003，在Excel2003窗口中依次單擊&lduo;工具&rduo;→&lduo;宏&rduo;→&lduo;錄制新宏&rduo;菜單命令，打開&lduo;錄制新宏&rduo;對(duì)話框。在&lduo;宏名&rduo;編輯框中輸入任意名稱，然后在&lduo;保存在&rduo;下拉菜單中選中&lduo;個(gè)人宏工作簿&rduo;選項(xiàng)，并單擊&lduo;確定&rduo;按鈕。

第2步，在打開的錄制宏工具欄中單擊&lduo;停止錄制&rduo;按鈕，Excel2003即可自動(dòng)添加&lduo;個(gè)人宏工作簿&rduo;。

第3步， 在Excel2003窗口中依次單擊&lduo;工具&rduo;→&lduo;宏&rduo;→&lduo;Visual Basic編輯器&rduo;菜單命令，打開Visual Basic編輯器窗口。右鍵單擊左側(cè)&lduo;工程&rduo;窗格中的&lduo;VBAProject()&rduo;選項(xiàng)，依次選擇&lduo;插入&rduo;→&lduo;模塊&rduo;菜單命令插入模塊1。

第4步，雙擊&lduo;模塊1&rduo;打開代碼輸入窗口，輸入下面的代碼:
Sub dy()
On Error Resume Next
x = ExecuteExcel4Macro(&uot;(50)&uot;)
For i = 1 To Int(x / 2) + 1
From:=2 * i - 1, To:=2 * i - 1
Next i
MsgBox &uot;請(qǐng)將打印出的紙張反向裝入紙槽中&uot;, vbOKOnly, &uot;打印另一面&uot;
For j = 1 To Int(x / 2) + 1
From:=2 * j, To:=2 * j
Next j
End Sub
輸入完成后依次單擊&lduo;文件&rduo;→&lduo;保存&rduo;菜單命令，并關(guān)閉Visual Basic編輯窗口返回Excel2003窗口。

2．在工具欄添加&lduo;雙面打印&rduo;按鈕
第1步，在Excel2003窗口依次執(zhí)行&lduo;工具&rduo;→&lduo;自定義&rduo;菜單命令，打開&lduo;自定義&rduo;對(duì)話框。在&lduo;命令&rduo;選項(xiàng)卡中的&lduo;類別&rduo;列表中選中&lduo;宏&rduo;選項(xiàng)，然后將&lduo;命令&rduo;列表中的&lduo;自定義按鈕&rduo;選項(xiàng)拖曳到工具欄上的合適位置。

第2步，選中剛剛添加的自定義按鈕，在&lduo;自定義對(duì)話框&rduo;中單擊&lduo;更改所選內(nèi)容&rduo;按鈕。在打開的快捷菜單中編輯&lduo;命名&rduo;編輯框，為自定義按鈕輸入名稱（如&lduo;雙面打印&rduo;），并選中&lduo;總是用文字&rduo;選項(xiàng)。

第3步，保持&lduo;自定義&rduo;對(duì)話框的打開狀態(tài)，然后右鍵單擊工具欄上剛添加的&lduo;雙面打印&rduo;按鈕，在打開的快捷菜單中單擊&lduo;指定宏&rduo;命令。
第4步，打開&lduo;宏&rduo;對(duì)話框，選中事先編輯的宏，并單擊&lduo;確定&rduo;按鈕，如圖所示。

3．雙面打印Excel2003表格
打開需要雙面打印的Excel2003文件，在工具欄中單擊&lduo;雙面打印&rduo;按鈕。Excel2003會(huì)先將奇數(shù)頁打印出來，然后打開&lduo;打開另一面&rduo;對(duì)話框，提示用戶將紙張反向裝入打印機(jī)的紙槽中。單擊&lduo;確定&rduo;按鈕即可將偶數(shù)頁打印到另一面上，從而實(shí)現(xiàn)雙面打印。