KutoolsforOffice— 一套方案,五大工具。事半功倍。

如何在 Word 文档中打印时去除页眉和页脚?

作者小杨修改日期

如果您的 Word 文档中包含页眉和页脚,默认情况下,打印时也会一并输出这些内容。但有时,您可能并不希望打印页眉和页脚。此时,本文介绍的方法或许正能帮到您。

使用 VBA 代码打印不带页眉页脚的 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. 然后,点击确定即可开始打印,文档将立即无页眉和页脚地打印出来。

最佳办公效率工具

Kutools for Word——集成超过 100 项卓越功能,全面提升您的 Word 体验!

🤖KUTOOLS AI 功能AI 助手/实时助手/超级润色(保留格式)/超级翻译(保留格式)/AI 遮挡/AI 校正……

📘 文档精通分割页面/文档合并/批量选择导出为多种格式(PDF/TXT/DOC/HTML……)/批量转换为 PDF……

内容编辑批量查找与替换跨多个文件/统一调整所有图片大小/调整翻转表格行列/表格转文本……

🧹 轻松清理:一键清除多余空格/分节符/文本框/超链接/ 想要更多清理工具,请前往移除分组……

创意插入:插入千位分隔符/复选框/选项按钮/二维码/条形码/多图插入/ 更多插入选项请查看插入分组……

🔍 精准选择:快速定位特定页面/表格/形状/标题段落/ 利用更多选择功能提升导航效率……

明星增强功能跳转到任意位置/自动插入重复文本/在多个文档 Windows 间切换/11 转换工具……

🌍 支持 40+ 种语言:无论您身处何地,Kutools 均支持英语、西班牙语、德语、法语、中文等 40 多种语言!

Kutools for Word
 
 

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 无缝集成 | ⚡ 保存时间,立即提升效率

最佳办公效率工具

Kutools for Word- 100+ 款 Word 工具