如何在不打印页眉和页脚的情况下打印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……
✏ 内容编辑：跨多个文件批量查找与替换 / 全部图片大小调整 / 翻转表格行和列 / 表格转文本……
🧹轻松清理：一扫而空多余空格 / 分节符 / 文本框 / 超链接 / 更多清除工具请前往清除所有功能组……
➕ 创意插入：插入千位分隔符 /复选框 /选项按钮 / 二维码 / 条形码 / 多张图片 / 更多请探索插入功能组……
🔍 精准选取：精准锁定指定页码 / 表格 / 形状 / 标题段落 /通过更多 选取 功能提升导航体验……
⭐ 明星增强：一键定位任何位置 / 自动插入重复文本 / 在文档窗口间快速切换 /11 项转换工具……
🌍 支持40+种语言：Kutools支持您的本地语言 — 英语、西班牙语、德语、法语、中文等40多种语言均适用！
