Application.Dialogs(xlDialogPrinterSetup) si Annuler

Re le forum,

Dans mon application j'utilise le code suivant :

Application.Dialogs(xlDialogPrinterSetup).show pour pouvoir sélectionner l'imprimante que l'utilisateur souhaite utiliser.

3 choix s'offrent à lui :

Configurer,

OK,

Annuler,

Je n'arrive pas à paramètrer le choix de la réponse.

S'il clique sur OK alors le code continue

S'il clique sur Annuler alors Goto Fin (fin que j'ai défini en bas de procédure.

J'essaie de récupérer la valeur de la constante (2 pour annuler) avec un code du style

If Vb = 2 then goto Fin

Else

Le code

Mais ça ne fonctionne pas.

Merci de votre aide,

Re-,

vb = Application.Dialogs(xlDialogPrinterSetup).Show
If vb = False Then
    GoTo fin
Else
MsgBox x
End If

Pffffff ça parait tellement évident que ça m'énerve de ne pas trouver seul.

Merci en tout cas c'est parfait.