Apercu avant impression choisir une autre imprimante que celle par defaut

Bonsoir à tous

mon objetif

aparcu avant d'impression de la feuille chèque et l'imprimer sur une autre imprimante que celle définie par défaut

Sub imprime_Cheque()
Application.ScreenUpdating = False
Imprimante = Application.ActivePrinter 'Mémorise le choix de l'imprimante avant l'impression
    With Cheque
    Selection.PrintOut Copies:=1, ActivePrinter:="HPA227BB (HP Smart Tank 510 series)"
    Application.ActivePrinter = Imprimante 'Retour à l'imprimante choisie avant l'impression
    End With
Application.ScreenUpdating = True
Sheets("MENU").Select
End Sub

Bonsoir,

Une petite recherche sur le forum, et hop on peut trouver ceci

https://forum.excel-pratique.com/excel/choisir-une-imprimante-macro-16805

Pensez-y

Rechercher des sujets similaires à "apercu impression choisir imprimante que celle defaut"