Otomatik kapatmayı pasif yaptım kodda ordan aktif edersiniz.
Bir deneyin.
Yani alttakilerin tek tırnakları kaldırın.
Kod:
' MyDoc.Close True
' Set objWord = Nothing
' objWord.Quit
' MyDoc.Quit
' wordKapatTaskManager
' Set MyDoc = Nothing