excel - 如何使用Excel VBA删除Word文档中的特定页面？

Question

我正在使用 Excel VBA 创建和填充 Word 文档，并且我想删除该文档中的特定页面。我尝试了以下删除方法:

With wDoc
    .GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Name:="20" 'Page number
    .Bookmarks("\Page").Select
    With Selection
      .Delete
    End With
End With

此代码在执行时不会返回任何错误消息，但单词页面内容不会按预期删除。我错过了什么？

Answer 1

检查下面的代码。我在这里删除了名称参数中的引号(将“20”替换为 20)您可以使用您的文档引用 wDoc，而不是我使用的 Activedocument。

With ActiveDocument
    .GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Name:=20 'Page number
    .Bookmarks("\Page").Select
    With Selection
      .Delete
    End With
End With