MsgBox Oui/Non

[Mamar32]

Bonjour,

Je souhaite faire une macro avec un bouton oui/non pour quitter une page et retourner à ma page "Menu".
Je voudrais que si on clique sur Oui la page s'enregistre et que l'utilisateur retourne à la feuille"Menu" et que si on clique sur Non, on reste sur la page initiale.
J'ai trouvé la formule ci dessous, mais je ne sais pas quoi mettre dans les lignes " procédure si click sur oui " et " procédure si click sur non" :

"Sub mess_03b()
'MsgBox Oui + Non
Select Case MsgBox("Votre message ici", vbYesNo, "Titre de la MsgBox")
Case vbYes
'procédure si click sur Oui
Case vbNo
'procédure si click sur Non
End Select
End Sub"

Merci pour votre aide,
Cordialement .

 

[Robert]

Re : MsgBox Oui/Non

Bonjour Mamar, bonjour le forum,

Peut-ête comme ça :

Sub Macro1()
If MsgBox("Enregistrer et retouner au menu ?", vbYesNo) = vbYes Then 'condition : si "oui" au message
    ThisWorkbook.Save 'enregistre le classeur
    Sheets("Menu").Activate 'active l'onglet "Menu"
End If 'fin de la condition
End Sub

 

[Mamar32]

Re : MsgBox Oui/Non

Merci beaucoup, ça fonctionne !