Automatiser impression avec Document Image Writer

Bonjour,

Je voudrais enregistrer un classeur Excel sous forme d'image avec "l'imprimante" Microsoft Office Document Image Writer.

J'ai écrit un code qui permet de le faire mais mon problème est que la boîte de dialogue 'Enregistrer Sous' apparait. Mais je ne veux pas qu'elle apparaisse car dans mon code j'impose le nom du fichier et le répertoire dans lequel enregistrer le document.


Quel est le code qui permet d'automatiser cet enregistrement sans que la boite de dialogue 'enregistrer sous' apparaisse ?

Merci pour vos réponse

Salut !

Code:

---

1 2 3 4

Dim NomClas As String NomClas = "CeQueTuVeux" & ".mdi" Ou "CeQueTuVeux.mdi" ActiveWindow.SelectedSheets.PrintOut Copies:=1,ActivePrinter:= "Microsoft Office Document Image Writer sur NE00:", PrToFilename:=NomCla

---

s


Et voilà, plus de message et ton fichier sera enregisté dans le répertoire par défaut.

Si tu veux l'enregistrer dans un répertoire précis :

Code:

---

NomClas = "C:\TonChemin" & "/" & NomClas

---

@ +++

ChrisOne

Merci beaucoup Crisone,
ca fonctionne