MsgBox erreur de compilation

Bonjour à tous.

Petit problème avec la fonction MsgBox; voici mon code :

MsgBox("Vous n'avez pas ou mal renseigné" _
& Chr(10) & Chr(13) & "ou le nom du lecteur" _
& Chr(10) & Chr(13) & "ou le nom du client" _
& Chr(10) & Chr(13) & "ou le prénom du client !" _
& Chr(10) & Chr(13) & "Abandon de la séquence", vbCritical, "Erreur de saisie") = vbOk

Ce code ne fonctionne pas, il me renvoie "Erreur de compilation, un appel de fonction dans la partie gauche de l'affectation doit renvoyer Variant ou Object".

Ca ne m'aide pas beaucoup. Du coup, quand je fais :

Rpse = MsgBox("Vous n'avez pas ou mal renseigné" _
& Chr(10) & Chr(13) & "ou le nom du lecteur" _
& Chr(10) & Chr(13) & "ou le nom du client" _
& Chr(10) & Chr(13) & "ou le prénom du client !" _
& Chr(10) & Chr(13) & "Abort", vbCritical, "Erreur de saisie")

Ca marche, même si je ne déclare pas Rpse (Dim) comme string ou autre

J'aimerais comprendre pourquoi la première rédaction ne fonctionne pas, alors qu'elle semble identique à tous les exemples que j'ai pu trouver dans les aides en ligne. L'intérêt serait de configurer correctement MsgBox pour avoir le choix des boutons à afficher. Ce code n'est qu'un exemple parmi d'autres, où je dois avoir le choix de configurer plusieurs boutons en plus de "OK".

Merci pour votre aide. Bien cordialement, FJx

Bonjour,

    If MsgBox("Vous n'avez pas ou mal renseigné" _
        & Chr(10) & Chr(13) & "ou le nom du lecteur" _
        & Chr(10) & Chr(13) & "ou le nom du client" _
        & Chr(10) & Chr(13) & "ou le prénom du client !" _
        & Chr(10) & Chr(13) & "Abandon de la séquence", vbOKCancel, "Erreur de saisie") = vbOK Then ......

bonjour,

MsgBox("Vous n'avez pas ou mal renseigné" _
& Chr(10) & Chr(13) & "ou le nom du lecteur" _
& Chr(10) & Chr(13) & "ou le nom du client" _
& Chr(10) & Chr(13) & "ou le prénom du client !" _
& Chr(10) & Chr(13) & "Abandon de la séquence", vbCritical, "Erreur de saisie") = vbOk

cette syntaxe n'est pas correcte et je me demande de quel exemple tu t'inspires.

essaie ceci

MsgBox "Vous n'avez pas ou mal renseigné" _
& Chr(10) & Chr(13) & "ou le nom du lecteur" _
& Chr(10) & Chr(13) & "ou le nom du client" _
& Chr(10) & Chr(13) & "ou le prénom du client !" _
& Chr(10) & Chr(13) & "Abandon de la séquence", vbCritical, "Erreur de saisie"

Merci bien, h2so4...

Oui, je ne sais pas non plus... Bref, étant débutant en vba, ...

Merci pour ton aide, ça fonctionne impecc.