ou est l'erreur ? vous avez dit bizarre ...

Bonsoir ,

je n'arrive pas à comprendre pourquoi en cliquant le bouton yes il me retourne le "yes" mais aussi un message d'erreur ( et dans les autres case c'est la meme chose)

Sub auto_open()
Dim Retour As Integer
On Error GoTo erreur
Retour = MsgBox("voulez vous vous mettre à jour avec la base ?", vbYesNoCancel + vbQuestion + vbDefaultButton2, "Mise à jour GEP ?")

If Retour = vbYes Then
MsgBox ("yes")
End If
If Retour = vbNo Then

MsgBox ("no")
Else
MsgBox ("else")
End If

erreur: MsgBox ("erreur")


End Sub


Merci