VBA Word Doc在某些计算机或某些版本的Word上无法关闭

Question

在Excel vba程序中，我有一个函数，它从Word文档返回一串文档文本。它适用于我尝试过的每台计算机，除了我的笔记本电脑。在我的工作笔记本电脑上，它无法关闭Word文档。

以下代码适用于使用Word 2011的家用计算机和带有Word 2010的工作站，但不适用于使用Word 2013的工作笔记本电脑。在我的工作笔记本电脑上运行时，程序会挂起doc.Close。

我已经检查过我需要的所有引用/库（Word对象库，Excel对象库，Microsoft Office对象库）。我用这个把头撞到了墙上。这是代码：

Private Function getDocText(filePath As String) As String
 Dim host As New Word.Application
 Dim doc As Word.Document
 Dim doctext As String

 Set doc = host.Documents.Open(filePath)    
 doctext = doc.Content.Text

 doc.Close
 host.Quit

 getDocText = doctext
End Function