Question

从Access中的表单启动Word时，我这样做：

   Dim wordApp As Word.Application
   Dim wordDoc As Word.Document
   Dim wordRange As Word.Range

   Set wordApp = CreateObject("Word.Application")

   wordApp.Visible = True
   Set wordDoc = wordApp.Documents.Open(etikettenTemplate)

   ' fill in some bookmarks in the word doc

   Set wordApp = Nothing
   Set wordDoc = Nothing
   Set wordRange = Nothing

问题是：第一次运行代码时运行正常。第二次出现运行时错误462：远程服务器计算机不存在或不可用。

麻烦的是，我无法控制整个周期，因为用户可能需要在关闭之前编辑单词doc。难道我做错了什么？感谢您的任何建议

Answer 1

抱歉，我自己已经能够解决问题了。

错误是我通过

访问了doc的书签

ActiveDocument.Bookmarks（mybookmark）.Range

而不是之前选择的wordDoc变量

使用wordDoc更改ActiveDocument的所有出现问题消失了。

感谢所有人

从Access启动Word - 第二次失败

1 个答案: