Despues de crear objeto, cerrarlo total sin mas preguntas

Amigos,

Consultando este grupo Google, ahi incluso Héctor Miguel/NOhemiordiS,
y despues Help+Web entendi mejor como utilizar CreatObject.

Asi , ya imprimo Word desde Excel. Pero mejor , ya miro desarrollar um
intercambio de datos entre Excel y IExplorer, pero esto es para outro
dia

Asi, esta macro funciona y bien :

Sub imprimirexplo2()

Dim WApp As Object
Set WApp = CreateObject("Word.Application")
WApp.Documents.Open "C:\Documents and Settings\PAULOBUH\Meus documentos
\Nova ortografia em 2008.doc"
WApp.Visible = True
WApp.PrintOut copies:=2
WApp.Documents.Open "C:\xxxxxx\ArchivoAlvo.doc"
WApp.PrintOut copies:=1

WApp.Quit

Set WApp = Nothing
End Sub

PERO...hay un perfeccionamento necesario

Cuando se abre el ArchivoAlvo.doc (ver la macro) , campos son
actualizados y, pues, cuando la macro lo cierra , surge la caja de
mensaje "Desea salvar las alteraciones? Si -no -cancelar". Y la macro
es interrumpida.

DESEO CERRAR TOTAL EL .DOC SIN ESTA PREGUNTA. ESTO ES POSIBLE?

Gracias

Bier/Brasil