當前位置:才華齋>計算機>office辦公>

怎樣編輯Excel巨集命令雙面列印Excel表格

office辦公 閱讀(2.43W)

Word2003的“列印”對話方塊中可以方便地設定雙面列印Word文件,但是在Excle2003中則沒有雙面列印的設定選項。使用者可以通過在Excel2003中編輯巨集命令實現雙面列印Excel2003表格。

怎樣編輯Excel巨集命令雙面列印Excel表格

1.編輯Excel2003巨集命令在Excel2003中第一次使用巨集功能時,需要新增“個人巨集工作簿”(即),然後再使用Visual Basic編輯器編輯雙面列印的巨集命令。操作步驟如下所述:第1步,開啟Excel2003,在Excel2003視窗中依次單擊“工具”→“巨集”→“錄製新巨集”選單命令,開啟“錄製新巨集”對話方塊。在“巨集名”編輯框中輸入任意名稱,然後在“儲存在”下拉選單中選中“個人巨集工作簿”選項,並單擊“確定”按鈕,如下圖所示。

圖2008070501 選中“個人巨集工作簿”選項第2步,在開啟的錄製巨集工具欄中單擊“停止錄製”按鈕,Excel2003即可自動新增“個人巨集工作簿”,如下圖所示。

圖2008070502 單擊“停止錄製”按鈕 第3步, 在Excel2003視窗中依次單擊“工具”→“巨集”→“Visual Basic編輯器”選單命令,開啟Visual Basic編輯器視窗。右鍵單擊左側“工程”窗格中的“VBAProject()”選項,依次選擇“插入”→“模組”選單命令插入模組1,如下圖所示。

圖2008070503 選擇“插入”→“模組”命令 第4步,雙擊“模組1”開啟程式碼輸入視窗,輸入下面的程式碼:Sub dy()On Error Resume Nextx = ExecuteExcel4Macro("ment(50)")For i = 1 To Int(x / 2) tOut From:=2 * i - 1, To:=2 * i - 1Next iMsgBox "請將打印出的紙張反向裝入紙槽中", vbOKOnly, "列印另一面"For j = 1 To Int(x / 2) tOut From:=2 * j, To:=2 * jNext jEnd Sub輸入完成後依次單擊“檔案”→“儲存”選單命令,並關閉Visual Basic編輯視窗返回Excel2003視窗,如下圖所示。

圖2008070504 輸入程式碼 2.在工具欄新增“雙面列印”按鈕第1步,在Excel2003視窗依次執行“工具”→“自定義”選單命令,開啟“自定義”對話方塊。在“命令”選項卡中的.“類別”列表中選中“巨集”選項,然後將“命令”列表中的“自定義按鈕”選項拖曳到工具欄上的合適位置,如下圖所示。

圖2008070505 拖動“自定義按鈕”選項第2步,選中剛剛新增的自定義按鈕,在“自定義對話方塊”中單擊“更改所選內容”按鈕。在開啟的快捷選單中編輯“命名”編輯框,為自定義按鈕輸入名稱(如“雙面列印”),並選中“總是用文字”選項,如下圖所示。

圖2008070506 命名自定義按鈕 第3步,保持“自定義”對話方塊的開啟狀態,然後右鍵單擊工具欄上剛新增的“雙面列印”按鈕,在開啟的快捷選單中單擊“指定巨集”命令,如下圖所示。

圖2008070507 單擊“指定巨集”命令第4步,開啟“指定巨集”對話方塊,選中事先編輯的巨集,並單擊“確定”按鈕,如下圖所示。

圖2008070508 “指定巨集”對話方塊第5步,關閉“自定義”對話方塊返回到Excel2003視窗。 3.雙面列印Excel2003表格開啟需要雙面列印的Excel2003檔案,在工具欄中單擊“雙面列印”按鈕。Excel2003會先將奇數頁打印出來,然後開啟“開啟另一面”對話方塊,提示使用者將紙張反向裝入印表機的紙槽中。單擊“確定”按鈕即可將偶數頁列印到另一面上,從而實現雙面列印,如下圖所示。