Как закрыть открыл слово документ Вручную с помощью Excel VBA

Question

Перед запуском кода Excel VBA, я открыл документ Word, вручную, можно закрыть этот конкретный документ Word, который открывается через Excel VBA

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