I have a macro that inserts select cells of an Excel document into a Word template, copies the entire Word document then closes the document without saving, to preserve cert
I had the same problem. And only code below closed this Word window:
Dim x As Variant X = Shell("powershell.exe kill -processname winword", 1)
I found this code in one of the answers Closing word application from excel vba