Réponse acceptée !
Bonjour,
Au lieu d'utiliser goto exit function tu peux traiter l'erreur
générée lorsque l'utilisateur clique sur Cancel.
Me.CommonDialog1.CancelError = True
On Error GoTo TRAITERCANCEL
Me.CommonDialog1.ShowOpen
Debug.Print Me.CommonDialog1.FileName
Exit Sub
TRAITERCANCEL:
If Err.Number = 32755 Then '
Debug.Print "l'utilisateur a cliqué sur cancel"
End If
Bonne programmation.
Cordialement medelidrissi
En Informatique, rien n'est impossible. Mais, ce n'est pas toujours évident.