无法从Access VBA中选择正确的活动文档（word）

谢谢你的阅读。 我正在access中编写一些VBA，它将数据导出到1个excel工作表和2个word文档。 如果在运行代码时没有打开其他word文档，那么一切都会正常工作。但是，如果word的另一个实例正在运行，我的一些选择和数据最终会出现在“其他”打开的word文档中。我的问题是，我似乎无法从代码中引用正确的文档。 欢迎任何帮助！：-）我花了好几天的时间想弄明白

错误发生在“Selection.EndKey…”点。我知道这是因为我在Word from Access中引用了该选项-我似乎不知道如何正确引用该选项，所以它在“wDoct”文档中引用了该选项。 选择只取最后一行并将其加粗，然后向右移动1个选项卡并插入更多数据。任何其他更好的解决方法都是非常受欢迎的。正如你所看到的，我刚刚开始学习；-）

---

对于任何感兴趣的人，我使用以下方法解决：

wDoct.Content.InsertAfter Text:=vbCr & Nz(rs!name, "") & "date" 'insert last row in          Word
wDoct.Content.InsertAfter Text:=vbTab & "name"
wDoct.Range(Start:=wDoct.Paragraphs.Last.Range.Start,     End:=wDoct.Paragraphs.Last.Range.Start + 10).Bold = True

---

请不要将您的问题编辑为“已解决”。相反，单击答案旁边的复选标记将其标记为已接受。

wDoct.Content.InsertAfter Text:=vbCr & Nz(rs!name, "") & "date" 'insert last row in          Word
wDoct.Content.InsertAfter Text:=vbTab & "name"
wDoct.Range(Start:=wDoct.Paragraphs.Last.Range.Start,     End:=wDoct.Paragraphs.Last.Range.Start + 10).Bold = True