如何使用Excel VBA關閉手動打開的Word文檔

Question

在運行excel vba代碼之前，我已經手動打開了Word文檔，是否可以關閉通過Excel VBA打開的特定Word文檔。

Answer 1

假設您尚未在Word應用程序上建立鈎子，則應執行以下操作：

Set wordApp = GetObject(, "Word.Application")

    For Each wdDoc In wordApp.Documents
        If wdDoc.Name = "close_me.docx" Then '// rename to your doc
            wdDoc.Close SaveChange:=False '// change to true if required
            DoEvents
            Exit For
        End If
    Next