Bouton imprimer en VBA qui ne fonctionne pas correctement

Bonjour

Dans mon classeur, j'ai crée un bouton imprimer, celui-ci fonctionne lorsque je clique sur imprimer.

Mais si je clique sur annuler, j'obtiens une erreur. D'où vient-elle ? Merci.

Bonjour toutes et tous

@Papoumac32

@ tester (sans certitude puisque c'est sur Mac)

Option Explicit

Sub Imprimer()
On Error Resume Next
Dim x

 x = Application.Dialogs(xlDialogPrint).Show
 If x = False Then Exit Sub

End Sub

Sub Imprimer()
Dim x

 x = Application.Dialogs(xlDialogPrinterSetup).Show
 If x = False Then Exit Sub

End Sub

crdlt,

André

Bonjour

Merci pour ces solutions. La première est la bonne. Encore merci.

Re,

merci du retour, bonne journée

crdlt,

André