Syntaxe msgbox VByesNo

Bonjour, je cherche la syntaxe pour faire fonctionner une Msgbox VbYesNo

J'ai un message d'erreur: "attendu fin d'instruction"

Merci de votre aide, JL

Mon code:

Public sub supprimer_liste

dim reponse as boolean

Msgbox"Voulez vous supprimer cet élément?",vbyesno

If reponse= yes then

supprimer

else

exit sub

retour

end if

end sub

Bonjour,

Ce serait plutôt quelque chose du genre :

Public Sub supprimer_liste()

If MsgBox("Voulez vous supprimer cet élément?", vbYesNo) = vbYes Then
    'Instructions (supprimer...)
End If

End Sub

Bonjour,

Voici :

Public Sub supprimer_liste()

    Dim reponse As Byte

    reponse = MsgBox("Voulez vous supprimer cet élément?", vbYesNo)

    If reponse = vbYes Then

        supprimer

    Else

        retour
        Exit Sub

    End If

End Sub

Merci super ça fonctionne!