如何列印不包含頁首與頁尾的 Word 文件？
如果您的 Word 文件包含頁首與頁尾，預設情況下列印時會一併輸出這些內容。但若您不希望列印頁首與頁尾，本文介紹的方法或許能為您提供協助。
使用 VBA 程式碼列印不含頁首與頁尾的 Word 文件
若要列印不含頁首與頁尾的 Word 檔案，以下 VBA 程式碼可助您一臂之力，請照著下列步驟操作：
1. 按住 ALT + F11 鍵，即可開啟 Microsoft Visual Basic for Applications 視窗。
2. 接著，點選插入＞ 模組，並將下方程式碼複製貼上至開啟的空白模組中：
VBA 程式碼：列印不含頁首與頁尾的 Word 文件：
Sub PrintDocWithoutHeaderFooter()
Call SetHeaderAndFooter(True)
Options.PrintHiddenText = False
Dialogs(wdDialogFilePrint).Show
Call SetHeaderAndFooter(False)
End Sub
Sub SetHeaderAndFooter(xBool As Boolean)
Dim xSel As Selection
For Each s In ActiveDocument.Sections
s.Headers(wdHeaderFooterEvenPages).Range.Font.Hidden = xBool
s.Headers(wdHeaderFooterFirstPage).Range.Font.Hidden = xBool
s.Headers(wdHeaderFooterPrimary).Range.Font.Hidden = xBool
s.Footers(wdHeaderFooterEvenPages).Range.Font.Hidden = xBool
s.Footers(wdHeaderFooterFirstPage).Range.Font.Hidden = xBool
s.Footers(wdHeaderFooterPrimary).Range.Font.Hidden = xBool
Next s
End Sub
3. 插入上述程式碼後，請按下 F5 鍵執行，隨即彈出列印對話方塊，請依需求設定列印選項，如截圖所示：
4. 接著點選確定開始列印，文件將立即以不含頁首與頁尾的方式輸出！
最佳 Office 生產力工具
Kutools for Word——透過超過 100 項卓越功能，全面提升您的 Word 體驗！
🤖KUTOOLS AI 功能：AI 助手/即時助手/超級潤色（保留格式）/超級翻譯（保留格式）/AI 遮擋/AI 校正……
📘 文件掌控力：分割頁面/文檔合併/以多種格式匯出選取內容（PDF/TXT/DOC/HTML……）/批次轉換為 PDF……
✏ 內容編輯：批量查找與替換多個檔案/調整所有圖片大小/翻轉表格列與欄/表格轉文本……
🧹 輕鬆清理：一鍵清除多餘空格、分節符、文字框與超連結！想要更多清除工具？立即前往移除群組……
➕ 創意插入：插入千位分隔符/複選框/選項按鈕/二維碼/條碼/多張圖片/ 更多功能請至插入群組……
🔍 精準選取：精確定位特定頁面/表格/圖形/標題段落/ 透過更多選取功能提升導覽效率……
⭐ 星級增強功能：快速跳轉至任意位置/自動插入重複文字/在文件 Windows 之間切換/11 轉換工具……
🌍 支援 40+ 種語言：使用您熟悉的慣用語言暢享 Kutools！支援英文、西班牙文、德文、法文、中文等 40 多種語言，操作更順手、體驗更流暢！
Office Tab- 為 Office 帶來分頁式介面，讓您的工作更輕鬆
- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 與 Project 中啟用分頁式編輯與閱讀體驗。
- 在同視窗的新分頁中開啟並建立多份文件，而非另開新視窗。
- 每天為您減少數百次滑鼠點擊，生產力提升 50%！
✨ Kutools for Office – 一次安裝，五大強大工具！
包含 Office Tab Pro·Kutools for Excel·Kutools for Outlook·Kutools for Word·Kutools for PowerPoint
📦 一套整合 5 項工具 | 🔗 與 Microsoft Office 無縫整合 | ⚡ 保存時間，立即提升生產力