VBA程序二次运行时编辑书签触发运行时错误5941

• 开发的VBA程序可生成document1文档，首次运行完全正常
• 保持document1打开状态下再次运行程序（生成document2过程中），弹出错误提示：“请求的成员不存在”
• 调试时高亮的代码行：Selection.GoTo What:=wdGoToBookmark, Name:=strBookmark
• 已确认代码中使用的书签strBookmark确实存在于目标文档中

解决思路与方案 #

1. 明确绑定目标文档对象 #

问题核心通常是VBA默认操作当前激活文档（此时document1可能仍处于激活状态），而非新创建的document2。必须在代码中明确指定操作的文档对象：

Dim targetDoc As Document
'根据你的生成逻辑初始化文档，比如从模板创建或新建
Set targetDoc = Documents.Add(Template:="你的模板路径", NewTemplate:=False, DocumentType:=wdNewBlankDocument)

'后续所有书签操作都基于targetDoc对象，而非全局的Selection或ActiveDocument
If targetDoc.Bookmarks.Exists(strBookmark) Then
    targetDoc.Bookmarks(strBookmark).Range.Text = "需要插入的内容"
End If

2. 摒弃对Selection对象的依赖 #

Selection完全依赖当前窗口的激活状态，极易出现跨文档操作错误。直接通过文档的Bookmarks集合操作书签范围是更可靠的方式：

'替换原来的Selection.GoTo代码
If targetDoc.Bookmarks.Exists(strBookmark) Then
    '示例：在书签位置插入内容
    targetDoc.Bookmarks(strBookmark).Range.InsertParagraphAfter
    targetDoc.Bookmarks(strBookmark).Range.Next.InsertText "新增内容"
End If

3. 确保新文档获得焦点（可选） #

如果必须使用Selection，则在操作书签前先激活新生成的文档：

targetDoc.Activate
Selection.GoTo What:=wdGoToBookmark, Name:=strBookmark

4. 排查书签命名冲突 #

确认document1中是否存在同名书签——若代码未指定文档对象，可能误操作了document1中的书签（比如该书签已被修改或删除）。确保新文档的书签是独立创建的，且操作时明确指向目标文档。

内容的提问来源于stack exchange，提问作者Puneeth