Thibault123
XLDnaute Junior
Bonjour,
Je souhaite avoir un bouton qui lance automatiquement l'impression d'une feuille sur une certaine imprimante (IMPGRE1005 sur SRV-VITMOM02.vit.net) et selon un certain raccourci d'impression déjà défini (Non conformité).
J'ai essayé d'enregistrer une macro mais cela ne prend pas en compte le raccourci d'impression.
Je n'ai que ça comme code:
imprimante = Application.ActivePrinter
Application.ActivePrinter = "\\SRV-VITMOM02.vit.net\IMPGRE1005"
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Application.ActivePrinter = imprimante
Merci d'avance pour votre aide.
Je souhaite avoir un bouton qui lance automatiquement l'impression d'une feuille sur une certaine imprimante (IMPGRE1005 sur SRV-VITMOM02.vit.net) et selon un certain raccourci d'impression déjà défini (Non conformité).
J'ai essayé d'enregistrer une macro mais cela ne prend pas en compte le raccourci d'impression.
Je n'ai que ça comme code:
imprimante = Application.ActivePrinter
Application.ActivePrinter = "\\SRV-VITMOM02.vit.net\IMPGRE1005"
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Application.ActivePrinter = imprimante
Merci d'avance pour votre aide.