Ragazzi metto il codice della stampa!
codice:
nomefile = App.Path & "\RisultatoFattAccompVend.doc"

 With WordXChangeCtrl1
    .OpenDocument App.Path & "\Cliente.doc"
    .ReplaceField "CampoFornitore", cmbragso.Text
    .ReplaceField "Via", txtind.Text
    .ReplaceField "Cap", txtcap.Text
    .ReplaceField "Citta", txtcitta.Text
    .ReplaceField "PIVA", txtpiva.Text.SaveDocumentAs nomefile
    ActiveDocument.PrintOut
    .CloseDocument
End With
Non mi chiude l'eseguibile winword.exe e quindi quando si lancia la seconda stampa mi da errore e non funziona.

Come devo fare?

Grazie Sara