Bonjour,

J'ai créé une macro me permettant d'imprimer directement un onglet sur une des imprimantes de notre société. Le pbl c'est que cette imprimante est en réseau et que d'un poste à l'autre, le chemin réseau n'est pas le même.

j'ai donc écrit le code comme suit, mais une erreur survient tout de même à l'exécution.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Application.ActivePrinter = "\\pardat2\Xerox 4110 PCL 6 on Ne02:"
On Error Resume Next
Application.ActivePrinter = "\\pardat2\Xerox 4110 PCL 6 on Ne03:"
On Error Resume Next
Cells(i + 1, 3) = "OK"
Worksheets("Feuille de Travail").PrintOut Copies:=1
Comment peut-on tester le n° du server ou éviter les messages d'erreur ?

Merci d'avance,
Phil....