編輯Excel宏命令雙面打印Excel2003表格
互聯(lián)網(wǎng) 發(fā)布時(shí)間：2008-10-04 19:36:24 作者：佚名 
我要評(píng)論
我要評(píng)論在Word2003的“打印”對(duì)話框中可以方便地設(shè)置雙面打印Word文檔，但是在Excle2003中則沒有雙面打印的設(shè)置選項(xiàng)。用戶可以通過在Excel2003中編輯宏命令實(shí)現(xiàn)雙面打印Excel2003表格。
1．編輯Excel2003宏命令
在Excel2003中第一次使用宏功能時(shí)，需要添加“個(gè)人宏工作簿”（
在Word2003的“打印”對(duì)話框中可以方便地設(shè)置雙面打印Word文檔，但是在Excle2003中則沒有雙面打印的設(shè)置選項(xiàng)。用戶可以通過在Excel2003中編輯宏命令實(shí)現(xiàn)雙面打印Excel2003表格。
1．編輯Excel2003宏命令
在Excel2003中第一次使用宏功能時(shí)，需要添加“個(gè)人宏工作簿”（即PERNOSAL.XLS），然后再使用Visual Basic編輯器編輯雙面打印的宏命令。操作步驟如下所述：
第1步，打開Excel2003，在Excel2003窗口中依次單擊“工具”→“宏”→“錄制新宏”菜單命令，打開“錄制新宏”對(duì)話框。在“宏名”編輯框中輸入任意名稱，然后在“保存在”下拉菜單中選中“個(gè)人宏工作簿”選項(xiàng)，并單擊“確定”按鈕，如圖2008070501所示。
圖2008070501 選中“個(gè)人宏工作簿”選項(xiàng)
第2步，在打開的錄制宏工具欄中單擊“停止錄制”按鈕，Excel2003即可自動(dòng)添加“個(gè)人宏工作簿”，如圖2008070502所示。
圖2008070502 單擊“停止錄制”按鈕
第3步， 在Excel2003窗口中依次單擊“工具”→“宏”→“Visual Basic編輯器”菜單命令，打開Visual Basic編輯器窗口。右鍵單擊左側(cè)“工程”窗格中的“VBAProject(PERNOSAL.XLS)”選項(xiàng)，依次選擇“插入”→“模塊”菜單命令插入模塊1，如圖2008070503所示。
圖2008070503 選擇“插入”→“模塊”命令
第4步，雙擊“模塊1”打開代碼輸入窗口，輸入下面的代碼：
Sub dy()
On Error Resume Next
x = ExecuteExcel4Macro("Get.Document(50)")
For i = 1 To Int(x / 2) 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * i - 1, To:=2 * i - 1
Next i
MsgBox "請(qǐng)將打印出的紙張反向裝入紙槽中", vbOKOnly, "打印另一面"
For j = 1 To Int(x / 2) 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * j, To:=2 * j
Next j
End Sub
輸入完成后依次單擊“文件”→“保存”菜單命令，并關(guān)閉Visual Basic編輯窗口返回Excel2003窗口，如圖2008070504所示。
圖2008070504 輸入代碼
2．在工具欄添加“雙面打印”按鈕
第1步，在Excel2003窗口依次執(zhí)行“工具”→“自定義”菜單命令，打開“自定義”對(duì)話框。在“命令”選項(xiàng)卡中的“類別”列表中選中“宏”選項(xiàng)，然后將“命令”列表中的“自定義按鈕”選項(xiàng)拖曳到工具欄上的合適位置，如圖2008070505所示。
圖2008070505 拖動(dòng)“自定義按鈕”選項(xiàng)
第2步，選中剛剛添加的自定義按鈕，在“自定義對(duì)話框”中單擊“更改所選內(nèi)容”按鈕。在打開的快捷菜單中編輯“命名”編輯框，為自定義按鈕輸入名稱（如“雙面打印”），并選中“總是用文字”選項(xiàng)，如圖2008070506所示。
圖2008070506 命名自定義按鈕
第3步，保持“自定義”對(duì)話框的打開狀態(tài)，然后右鍵單擊工具欄上剛添加的“雙面打印”按鈕，在打開的快捷菜單中單擊“指定宏”命令，如圖2008070507所示。
圖2008070507 單擊“指定宏”命令
第4步，打開“指定宏”對(duì)話框，選中事先編輯的宏，并單擊“確定”按鈕，如圖2008070508所示。
圖2008070508 “指定宏”對(duì)話框
第5步，關(guān)閉“自定義”對(duì)話框返回到Excel2003窗口。
3．雙面打印Excel2003表格
打開需要雙面打印的Excel2003文件，在工具欄中單擊“雙面打印”按鈕。Excel2003會(huì)先將奇數(shù)頁打印出來，然后打開“打開另一面”對(duì)話框，提示用戶將紙張反向裝入打印機(jī)的紙槽中。單擊“確定”按鈕即可將偶數(shù)頁打印到另一面上，從而實(shí)現(xiàn)雙面打印，如圖2008070509所示。
圖2008070509 更換紙張打印面
圖2008070501 選中“個(gè)人宏工作簿”選項(xiàng)
第2步，在打開的錄制宏工具欄中單擊“停止錄制”按鈕，Excel2003即可自動(dòng)添加“個(gè)人宏工作簿”，如圖2008070502所示。
圖2008070502 單擊“停止錄制”按鈕
第3步， 在Excel2003窗口中依次單擊“工具”→“宏”→“Visual Basic編輯器”菜單命令，打開Visual Basic編輯器窗口。右鍵單擊左側(cè)“工程”窗格中的“VBAProject(PERNOSAL.XLS)”選項(xiàng)，依次選擇“插入”→“模塊”菜單命令插入模塊1，如圖2008070503所示。
圖2008070503 選擇“插入”→“模塊”命令
第4步，雙擊“模塊1”打開代碼輸入窗口，輸入下面的代碼：
Sub dy()
On Error Resume Next
x = ExecuteExcel4Macro("Get.Document(50)")
For i = 1 To Int(x / 2) 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * i - 1, To:=2 * i - 1
Next i
MsgBox "請(qǐng)將打印出的紙張反向裝入紙槽中", vbOKOnly, "打印另一面"
For j = 1 To Int(x / 2) 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * j, To:=2 * j
Next j
End Sub
輸入完成后依次單擊“文件”→“保存”菜單命令，并關(guān)閉Visual Basic編輯窗口返回Excel2003窗口，如圖2008070504所示。
圖2008070504 輸入代碼
2．在工具欄添加“雙面打印”按鈕
第1步，在Excel2003窗口依次執(zhí)行“工具”→“自定義”菜單命令，打開“自定義”對(duì)話框。在“命令”選項(xiàng)卡中的“類別”列表中選中“宏”選項(xiàng)，然后將“命令”列表中的“自定義按鈕”選項(xiàng)拖曳到工具欄上的合適位置，如圖2008070505所示。
圖2008070505 拖動(dòng)“自定義按鈕”選項(xiàng)
第2步，選中剛剛添加的自定義按鈕，在“自定義對(duì)話框”中單擊“更改所選內(nèi)容”按鈕。在打開的快捷菜單中編輯“命名”編輯框，為自定義按鈕輸入名稱（如“雙面打印”），并選中“總是用文字”選項(xiàng)，如圖2008070506所示。
圖2008070506 命名自定義按鈕
第3步，保持“自定義”對(duì)話框的打開狀態(tài)，然后右鍵單擊工具欄上剛添加的“雙面打印”按鈕，在打開的快捷菜單中單擊“指定宏”命令，如圖2008070507所示。
圖2008070507 單擊“指定宏”命令
第4步，打開“指定宏”對(duì)話框，選中事先編輯的宏，并單擊“確定”按鈕，如圖2008070508所示。
圖2008070508 “指定宏”對(duì)話框
第5步，關(guān)閉“自定義”對(duì)話框返回到Excel2003窗口。
3．雙面打印Excel2003表格
打開需要雙面打印的Excel2003文件，在工具欄中單擊“雙面打印”按鈕。Excel2003會(huì)先將奇數(shù)頁打印出來，然后打開“打開另一面”對(duì)話框，提示用戶將紙張反向裝入打印機(jī)的紙槽中。單擊“確定”按鈕即可將偶數(shù)頁打印到另一面上，從而實(shí)現(xiàn)雙面打印，如圖2008070509所示。
圖2008070509 更換紙張打印面
相關(guān)文章
word怎么單獨(dú)導(dǎo)出一頁? word導(dǎo)出部分頁的技巧
在編輯Word文檔時(shí)，有時(shí)我們只需要導(dǎo)出其中的部分頁面，而不是整個(gè)文檔，下面將介紹如何在Word中導(dǎo)出部分頁面2025-04-14問卷星怎么轉(zhuǎn)換成word文檔? 問卷星問卷調(diào)查導(dǎo)出成word的技巧
在日常工作中，我們經(jīng)常需要將問卷星上的問卷內(nèi)容導(dǎo)出為Word格式，以便整理和分析數(shù)據(jù)，以下是三種簡(jiǎn)單的操作方法2025-04-14word文檔一整頁怎么截屏? word文檔截圖截一張全的圖片技巧
在Word文檔中想將一整頁截屏下來，可以通過使用鍵盤中的Print Screen鍵和Word自帶的截屏功能等多種方法截圖，詳細(xì)如下2025-04-14word開發(fā)工具怎么調(diào)出來? word工具欄添加開發(fā)工具的教程
許多用戶在使用Word時(shí)，可能會(huì)發(fā)現(xiàn)菜單欄中缺少了“開發(fā)者工具”這一重要選項(xiàng)，這無疑限制了Word的某些高級(jí)功能應(yīng)用，詳細(xì)請(qǐng)看下文介紹2025-04-14Word文本框中的數(shù)字和英文字母如何進(jìn)行豎排? word文檔排版技巧
用Word進(jìn)行排版成為我們辦公中的主要方式，偶爾我們也可能會(huì)讓文字豎著排版，讓文字豎著排版我們都知道怎么操作，但是如何讓英文字母和數(shù)字也縱向顯示呢？詳細(xì)請(qǐng)看下文介紹2025-03-25word文本框怎么對(duì)齊? word多個(gè)文本框快速批量對(duì)齊的技巧
word中有很多文本框，排列很亂，想要將所有文本框?qū)R，該怎么操作呢？下面我們就來看看詳細(xì)的教程2025-03-21word分欄后如何設(shè)置頁碼? Word同一頁分欄后的文本分別設(shè)置頁碼技巧
在使用Word進(jìn)行文檔排版時(shí)，經(jīng)常需要將文檔分欄，并且希望每欄都有不同的頁碼,這種效果在Word默認(rèn)的頁碼樣式中并不存在，需要通過手動(dòng)插入域來實(shí)現(xiàn)，以下是詳細(xì)步驟2025-03-13word多級(jí)列表怎么修改編號(hào)? Word多級(jí)列表各級(jí)編號(hào)格式批量修改技巧
編輯Word長(zhǎng)文檔時(shí)，為了讓文本之間具有層次性，編號(hào)的使用必不可少，那么，對(duì)于編號(hào)，你會(huì)使用了嗎？詳細(xì)如下2025-03-13Word頁面版式設(shè)置:Word創(chuàng)建多級(jí)列表常見問題解決辦法
你是否在設(shè)置多級(jí)列表時(shí)遇到了編號(hào)問題？今天來分享創(chuàng)建多級(jí)列表的常見問題，別擔(dān)心，這里為你提供全面的解決方案2025-03-13word文檔怎么鎖定排版? 輕松鎖定你的精心布局防止排版錯(cuò)亂
在 Word 文檔中鎖定排版，防止他人隨意更改格式，可嘗試以下兩種方法，輕松鎖定你的精心布局，詳細(xì)如下文所屬2025-03-11
