如何删除Word文档中的多个特定页面?

网友投稿 584 2024-02-04

如何删除Word文档中的多个特定页面?

在Word文档中,您可以选择当前页面的内容,然后按Delete键可以轻松删除当前页面。 但是,如果您需要从一个较大的Word文件中删除多个页面,如何迅速解决呢?

使用“转到”功能删除Word文档中的页面范围

使用VBA代码删除Word文档中的多个特定页面

使用“转到”功能删除Word文档中的页面范围

如果要从Word文档中删除一系列连续的页面,则转到功能可以帮您一个忙。

1。 启动您要删除页面的Word文档。

2。 然后按 F5 键打开 查找和替换 对话框中的 转到 标签,点击 ,在 去什么 列表框,然后输入要从中删除的起始页码,然后按 输入 键转到特定页面,请参见屏幕截图:

2。 然后关闭这个查找和替换 对话框,然后按 F8 打开 延伸模式.

3。 继续按 F5 键打开 查找和替换 对话框,这一次,输入要删除的结束页码,然后按 输入 键。 从15到20的所有页面都已被选中。 看截图:

4。 最后按 删除 直接按一下即可立即删除这些页面。

使用VBA代码删除Word文档中的多个特定页面

要删除一个不连续的Word文件中的多个特定页面,下面的VBA代码可以为您提供帮助。

1。 按住 ALT + F11 键打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块,然后将以下代码粘贴到“模块窗口”中。

VBA代码:删除Word文件中的多个特定页面:

Sub DeletePagesInDoc() Dim xRange As Range Dim xPage As String Dim xDoc As Document Dim xArr Dim I, xSplitCount As Long Application.ScreenUpdating = False Set xDoc = ActiveDocument xPage = InputBox("Enter the page numbers of pages to be deleted: " & vbNewLine & _ "use comma to separate numbers", "KuTools for Word", "") xArr = Split(xPage, ",") xPageCount = UBound(xArr) For I = xPageCount To 0 Step -1 Selection.GoTo wdGoToPage, wdGoToAbsolute, xArr(I) xDoc.Bookmarks("\Page").Range.Delete Next Application.ScreenUpdating = True End Sub

3。 然后按 F5 键运行此代码,并弹出一个提示框,提醒您输入要删除的页码,请用逗号分隔页码,请参见屏幕截图:

4。 然后,单击 OK 按钮,您指定的所有页面都被立即删除。

选择多个单独的页面,然后一次将其删除:

如果您要从大型Word文档中删除多个特定页面, Kutools for Words 选择页面 该功能可以帮助您根据需要先选择任何页面,然后按 删除 键一次删除它们。

Kutools for Word:具有100多个方便的Word加载项,可以在60天内免费试用,没有限制。 点击下载并立即免费试用!

最佳办公生产力工具

Kutools for Word - 通过 Over 提升您的文字体验 100 显着特点!

深入了解下面突出显示的功能或 单击此处探索 Kutools for Word 的全部功能.

📘 文档掌握: 分页  /  合并文件  /  以各种格式导出选择(PDF/TXT/DOC/XLSX)  /  批量转换为PDF  /  将页面导出为图像  /  一次打印多个文件 ...

内容编辑: 批量查找和替换 跨多个文件   /  调整所有图片的大小   /  转置表行和列  /  将表格转换为文字 ...

🧹轻松清洁: 扫开 多余的空间  /  分节符  /   所有标题  /  文本框  /  超链接  /  如需更多删除工具,请前往我们的删除组

创意插入: 插页 千位分隔符  /  复选框  /  单选按钮  /  二维码  /  条码  /  对角线表  /  公式标题  /  图片说明  /  表标题  /  多张图片  /  在我们的插入组中发现更多信息

🔍 精准选择: 精确定位特定页面  /  表  /  形状  /  标题段落  /  使用我们的选择组轻松导航

星级增强: 快速导航至任何位置  /  自动插入重复文本  /  在文档窗口之间无缝切换  /  11 转换工具 ...

使用 Kutools 转换您的 Word 任务。 👉 立即下载并试用 30 天 🚀。

了解更多       免费下载      购买

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:如何在Word文档中水平或垂直拆分表格?
下一篇:如何从Word文档中的表中删除重复的行?
相关文章