kromitou
XLDnaute Occasionnel
Bonjour
Voila ce p'tit code me permet d'imprimer sur l'imprimante de mon serveur... donc à priori ça fonctionne...mais comment choisir le Bac N°3 ????
Merci d'avance si quelqu'un à une p'tite réponse...
Private Sub CommandButton3_Click()
Sheets("Bureau de Controle").Select
Application.ActivePrinter = _
"\\srvxxxx.xxxxx.local\RICOH Aficio 1060 RPCS sur Nexx:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"\\srvcompobat.compobat.local\RICOH Aficio 1060 RPCS sur Nexx:", Collate:= _
True
End Sub
Voila ce p'tit code me permet d'imprimer sur l'imprimante de mon serveur... donc à priori ça fonctionne...mais comment choisir le Bac N°3 ????
Merci d'avance si quelqu'un à une p'tite réponse...
Voila ce p'tit code me permet d'imprimer sur l'imprimante de mon serveur... donc à priori ça fonctionne...mais comment choisir le Bac N°3 ????
Merci d'avance si quelqu'un à une p'tite réponse...
Private Sub CommandButton3_Click()
Sheets("Bureau de Controle").Select
Application.ActivePrinter = _
"\\srvxxxx.xxxxx.local\RICOH Aficio 1060 RPCS sur Nexx:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"\\srvcompobat.compobat.local\RICOH Aficio 1060 RPCS sur Nexx:", Collate:= _
True
End Sub
Voila ce p'tit code me permet d'imprimer sur l'imprimante de mon serveur... donc à priori ça fonctionne...mais comment choisir le Bac N°3 ????
Merci d'avance si quelqu'un à une p'tite réponse...