Bonjour, j'ai crée une macro pour imprimer en PDF. Je souhaiterais activer par défaut l'option imprimer classeur entier avant l'affichage de mon xlDialogPrint(pour que les utilisateurs n'ai pas a le faire). La commande doit etre collate:=true mais je ne sais comment la placer dans mon code.
Pouvez vous me venir en aide, SVP ?
Private Sub CommandButtonOK_Click()
On Error GoTo Err1:
Application.ActivePrinter = "Adobe PDF sur Ne01:"
Application.Dialogs(xlDialogPrint).Show
Workbooks(classeur1).Close
Exit Sub
Err1:
On Error GoTo Err2:
Application.ActivePrinter = "Adobe PDF sur Ne02:"
Application.Dialogs(xlDialogPrint).Show
Workbooks(classeur1).Close
Exit Sub
Err2:
Application.ActivePrinter = "Adobe PDF sur Ne03:"
Application.Dialogs(xlDialogPrint).Show
Workbooks(classeur1).Close
Exit Sub
End Sub