Printout

Bonjour,
je lance un printout vers imagine (document image writer)
le document est bien créé mais cela ouvre également une fenetre qui affiche ce document.
je ne trouve pas comment fermer automatiquement cette fenetre.

ndf = ActiveWorkbook.Path & "\FICHE.mdi"
ActiveSheet.PrintOut From:=1, To:=1, Copies:=1, ActivePrinter:="Microsoft Office Document Image Writer", PrintToFile:=True, Collate:=False, PrToFileName:=nd



merci de votre aide