Re : Forcer utilisation de l'imprimante par défaut
Bonjour,
S'il faut sélectionner l'imprimante:
Private Sub CommandButton10_Click()
Application.ScreenUpdating = False
Sheets("Feuille").Activate
Range("PlageNommée").Select
Application.Dialogs(xlDialogPrinterSetup).Show
Selection.PrintOut Copies:=1, Collate:=True
Application.ScreenUpdating = True
End Sub
A essayer.
A+