word的工具欄里沒有提供給“打印當前頁”的命令，只能從“文件”菜單中選擇“打印”，再選“當前頁”，比較不方便。但是我們可以通過“宏”，自己設計這么一個功能。

　　宏代碼如下，兩段代碼都可以實現“打印當前頁”。前一種，彈出“打印”對話框，自動選擇了“打印當前頁”，最后需要自己點擊“確定”鍵。后一種，不會彈出對話框，而是直接打印了。

　　可以將這個功能手動放到工具欄上，隨時使用。

Sub 打印當前頁() With Dialogs(wdDialogFilePrint)

.Range = wdPrintCurrentPage

.Show

End With End Sub

Sub 打印當前頁() Application.PrintOut FileName:="", Range:=wdPrintCurrentPage End Sub 當然，還有一種不需要編寫代碼的方法，就是操作一遍“打印當前頁”的過程，錄制成宏。