probleme de code pour des postes differents

bonjour j'ai un code qui permet de sauver une version pdf automattiquement . le probleme est le suivant :ce dernnier ne marche que sur mon poste et pas sur celui de mes collegues Y a til un code generique qui permettrtrait de contourne ce probleme sachant que nous utilisons le meme template( je ne peux pas aller sur le poste de caunn et reecrire le code pour leur pdf creator)
voici le code

Code :

Code:

---

1 2 3 4

Private Sub Workbook_BeforeClose(Cancel As Boolean)Application.ActivePrinter = "PDFCreator on Ne01:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "PDFCreator on Ne01:", Collate:=True end sub

---

Bonsoir,

Citation:

---

ce dernnier ne marche que sur mon poste et pas sur celui de mes collegues

---

Cela ne nous dit pas quel est le message d'erreur. D'autre part ca devrait pouvoir s'ecrire comme ceci:

Code:

---

1 2 3 4

Private Sub Workbook_BeforeClose(Cancel As Boolean) ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _ "PDFCreator on Ne01:", Collate:=True End Sub

---

ou comme cela:

Code:

---

1 2 3 4

Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.ActivePrinter = "PDFCreator on Ne01:" ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End Sub

---

A l'aveuglette on peut simplement supposer que tes collegues ne disposent pas de l'imprimante que tu essaye d'imposer.

Cordialement,

Tirex28/

Salut, Ton probleme vient de "PDFCreator on Ne01:" ou NeXY change suivant le poste sur lequel la macro s'exécute
voir http://www.developpez.net/forums/d43...bat-distiller/
ou le probleme pour Acrobat Distiller est le même , à adapter à ton contexte