macro changement d'imprimante

erwanhavre

XLDnaute Occasionnel
Bonsoir à tous je cherche une macro qui pourrai changer l'imprimante réseau pour une certaine impression
je m'explique il y à 2 ans j'ai créé une macro avec l'enregistreur de macro pour passer d'une imprimante lazer a4 à une imprimante zébra (étiquettes autocollantes)
On trouvai le contenu du module ci-dessous

Application.ActivePrinter = "le nom de l'imp sur Ne03:"
ExecuteExcel4Macro _
"PRINT(1,,,1,,,,,,,,2,""le nom de l'imp sur Ne03:"",,TRUE,,FALSE)"
Application.ActivePrinter = "le nom de l'imp sur Ne04:"
etc etc

ça marchais pas trop mal sauf quelque fois ou il fallait changer le n° Ne04/05/06
MAIS
Depuis peu de temps nous avons changé de type de réseau et depuis les imprimantes ont changées de noms autre problème lorsque j'enregistre maintenant une macro pour modifier l'imprimante rien n'indique dans le module le faits de changer d'imprimante
bref je suis bloqué
de mon coté je connais le nom et l'adresse ip

je suis friand de toute pistes
merci à tous
 

Lone-wolf

XLDnaute Barbatruc
Re : macro changement d'imprimante

Bonjour erwanhavre,

voici un classeur trouvé sur le site de Chip Pearson. Celui-ci liste les imprimantes. Les lignes sont à adapter suivant le nombre d'imprimantes que vous avez.



A+ :cool:
 

Pièces jointes

  • Lister Imprimantes par défaut.xls
    56 KB · Affichages: 42
  • Lister Imprimantes par défaut.xls
    56 KB · Affichages: 47

Discussions similaires

Réponses
7
Affichages
772

Statistiques des forums

Discussions
315 096
Messages
2 116 184
Membres
112 679
dernier inscrit
Yupanki