Imprimir en Word desde VB

vicens
12 de Agosto del 2004
Desde una aplicació VB genero un documento Word y lo imprimo.
El problema es que si cierras el documento Word antes que lo haya enviado todo a la impresora, entonces Word cancela la impresión o no imprime nada.
El codigo es:

Dim objWord as word.Application

Set objWord=new Word.Application
objWord.Documents.Open (App.Path & "Documento1.doc")
objWord.ActiveDocument.PrintOut
objWord.ActiveDocument.Close savechanges:=False
objWord.Application.Quit
Set objWord = Nothing

Con este codigo Word cancela la impresión porque se cierra el documento antes de que haya podido enviarlo por completo a la impresora.

La pregunta es: Como puedo saber, una vez ejecutado PrintOut, cuando Word ha terminado de enviar el documento a la impresora para poder cerrar Word?

Perdon por la extension y gracias de antemano

Vicenç Oliveras