Impression d'une feuille Excel par macro --> Ne pas utiliser l'imprimante par défaut

Bonjour le forum,

Voilà j'ai un bouton sur une feuille Excel qui me remplit les cellules puis imprimer la page. Voici la ligne de code qui concerne l'impression :

Code:

---

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:=True

---

J'ai ainsi un aperçu avant impression, mais si je clique ensuite sur imprimer je ne peux pas choisir l'imprimante et ça imprime automatiquement vers l'imprimante par défaut ... comment proposer le choix de l'imprimante?

Je n'ai pas ce problème si j'imprime sans vba mais je souhaite absolument passer par la macro pour imprimer.

Merci d'avance!

Salut, qqch dans le genre, à adapter, voir avec enregistreur de macros

Code:

---

1 2 3 4 5 6 7 8 9

Option Explicit   Sub Tst() Dim sDefaultPrinter As String sDefaultPrinter = Application.ActivePrinter Application.ActivePrinter = "PDFCreator sur Ne00:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Application.ActivePrinter = sDefaultPrinter End Sub

---

En cherchant un peu tu aurais trouver facilement...

Code:

---

1 2	Application.Dialogs(xlDialogPrint).Show

---

T'ouvre la boite de dialogue pour imprimer, ne te reste plus qu'a choisir imprimante listé...

Bonjour,

Citation:

---

Envoyé par CODYCO

En cherchant un peu tu aurais trouver facilement...

---

Oui ;) sauf que explicitement si la personne fait une preview, c'est souvent parce que justement, elle ne veut pas forcément lancer l'impression, donc lui faire choisir l'imprimante par défaut avant à chaque fois, ça peut être lourd..

@ fowlie essayes avec la méthode Prinpreview du genre :

Code:

---

Worksheets(1).PrintPreview

---

plus précisément / ton cas :

Code:

---

ActiveWindow.SelectedSheets.PrintPreview

---

tu auras la boîte des imprimantes si impression confirmée

cordialement,

Ps : si le côté technique de la réponse = OK ou pas => pensez à cliquer sur les pouces et quand question résolue à la taguer résolue, et chaque action vous rapporte des points

Didier

Merci pour vos réponses, effectivement si je fait une preview c'est parce que je ne veux pas lancer l'impression sans vérifier avant ...

Je vais tester les solutions proposées et je reviens vers vous.

EDIT
_______________
Merci pour la réponse Ormonth ça marche nickel!!!!

Re, utilise une imprimante virtuelle style Acrobat, PDFCreator etc , visualise via Acrobat Reader par exemple et si OK imprime sur une imprimante physique via le Reader.

J'avais déjà penser à cette solution kiki29 mais ça fait trop d'étapes =)