為節約用紙現在許多部門都要求雙面用紙，但Excel偏偏沒有雙面打印功能。放棄Excel改用其他軟件？恐怕多數人不會這么做，因為Excel強大的表格功能具有很強的吸引力。那么如何解決這一問題？其實很簡單，我們可以自己動手，在Excel中添加一個“雙面打印”按鈕。
以Excel2003為例。打開Excel，點擊“工具”→“宏”→“VisualBasic編輯器”，進入VisualBasic編輯狀態。在彈出的窗口中點擊左側“工程資源管理器”區域中的“VBAProject（PERNOSAL.XLS）”選項，執行“插入”→“模塊”，插入一個新模塊。需要注意的是，假如你是第一次使用“宏”，在進行上述操作之前，需要添加“個人宏工作簿”，即PERNOSAL.XLS。
增加的模塊其VB代碼如下：
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 "請將打印出的紙張反向裝入紙槽中"， vbOKOnly， "打印另一面"
For j = 1 To Int(x / 2) + 1
ActiveWindow.SelectedSheets.PrintOut From:=2 * j， To:=2 * j
Next j
End Sub
輸入完成后，關閉Visual Basic編輯窗口返回。
之后還需要添加“雙面打印”按鈕：
1：執行“工具→自定義”命令，打開“自定義”對話框。
2:切換到“命令”標簽下，在“類別”下面選中“宏”選項，然后將右側“命令”下面的“自定義按鈕”選項拖到工具欄合適位置上，添加一個按鈕。
3:單擊“更改所選內容”按鈕，在隨后展開的快捷菜單中，在“命名”右側的方框中輸入按鈕名稱(如“雙面打印”，并選中“總是用文字”選項。
4:在不關閉“自定義”對話框的情況下，右擊工具欄上剛才添加的“雙面打印”按鈕，在隨后彈出的快捷菜單中，選擇“指定宏”選項，打開“指定宏”對話框。
5:選中上面編輯的宏，確定退出，再關閉“自定義”對話框返回Excel編輯狀態。
啟動Excel，打開需要雙面打印的工作簿文件，單擊“雙面打印”按鈕，系統先將奇數頁打印出來，然后彈出提示框，將打印的紙張反向裝入打印機的紙槽中，按下“確定”按鈕，即可將偶數頁打印到另一面上，達到雙面打印的目的。
小提示
如果在打印過程中，出現夾紙現象，致使部分頁面損壞，可以通過執行“文件→打印”命令，打開“打印”對話框，用手動的方法將少量損壞的頁單獨打印出來即可。
