Prova così :

codice:
objdoc.Close 
objWord.Quit 

Set objWord = Nothing
Ciao,