使用GetObject引用Word文档时触发‘源应用可能繁忙’错误

尝试通过Excel VBA的GetObject方法引用已打开的Word文档时，执行代码会卡顿20-30秒，随后弹出错误提示：

The object is not responding because the source application may be busy

使用的代码如下：

Dim oWord As Object

Set oWord = GetObject(, "Word.Application")
Debug.Print oWord.Documents.Count

仅执行上述代码，调用Documents.Count时就会报错，无法对GetObject获取的对象进行操作。曾尝试用CreateObject打开文件，但打开后同样无法访问对象。

解决方案 #

排查后发现任务管理器中存在20个因测试产生的Word后台实例，这导致GetObject方法超时。关闭所有Word实例后重新打开一个目标文档，再次运行代码即可正常获取Documents.Count的正确值。

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