提示:其它语言是由 Google 机器翻译的。 你可以访问 English 版本。
登录
x
or
x
x
马上登记
x

or

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

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

使用“转到”功能删除Word文档中的一系列页面

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


选择多个特定页面,然后立即删除它们:

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

doc删除多个页面4

Kutools for Word:拥有超过100便利的Word插件,可以免费试用60时间不受限制。 点击下载并免费试用现在!


使用“转到”功能删除Word文档中的一系列页面

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

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

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

doc删除多个页面1

2。 然后,关闭它 查找和替换 对话框,然后按 F8 打开 扩展模式.

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

doc删除多个页面2

4。 最后,按 删除 直接键,一次删除这些页面。


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

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

1。 按住 ALT + F11 键打开 Microsoft Visual Basic for Applications 窗口。

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 键运行此代码,弹出提示框提醒您输入要删除的页码,请用逗号分隔页码,见截图:

doc删除多个页面3

4。 然后点击 OK 按钮,您指定的所有页面一次被删除。



推荐的Word生产力工具

Kutools For Word - 超过100 Word的高级功能,节省您的50%时间

  • 复杂和重复的操作可以在几秒钟内完成一次性处理。
  • 一次将多个图像跨文件夹插入Word文档。
  • 将多个文件夹合并并组合成一个具有所需订单的文件。
  • 根据标题,分节符或其他标准将当前文档拆分为单独的文档。
  • 在Doc和Docx,Docx和PDF之间转换文件,用于常见转换和选择的工具集合等等......
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.