Choix depuis message box
Résolu
Philou99.CH
-
Philou99.ch -
Philou99.ch -
Bonjour à vous,
Vous trouverez un programme Excel 2010 dans lequel je suis ennuyé.
Après avoir créé un dossier administratif d'une personne, l'utilisateur à une relecture sous une forme différente de ce qu'il a entrée. Jusque là, grâce à vous déjà d'ailleurs, j'ai pu évoluer.
Par contre j'aimerai savoir si il est possible d'avoir une boîte à message dans laquelle il y a le OUI et le NON. Et selon que l'utilisateur clic l'un ou l'autre, la suite du programme est différente.
D'avance je vous remercie
Le lien est :
http://cjoint.com/?3Lul3upqK0E
Vous trouverez un programme Excel 2010 dans lequel je suis ennuyé.
Après avoir créé un dossier administratif d'une personne, l'utilisateur à une relecture sous une forme différente de ce qu'il a entrée. Jusque là, grâce à vous déjà d'ailleurs, j'ai pu évoluer.
Par contre j'aimerai savoir si il est possible d'avoir une boîte à message dans laquelle il y a le OUI et le NON. Et selon que l'utilisateur clic l'un ou l'autre, la suite du programme est différente.
D'avance je vous remercie
Le lien est :
http://cjoint.com/?3Lul3upqK0E
2 réponses
-
Bonjour,
Oui, très simplement.
Dim Reponse As Integer Reponse = MsgBox("Voulez-vous coucher avec moi?", VbYesNo + VbQuestion, "Ce soir?") If reponse = VbYes Then 'ICI Cas du clic sur oui MsgBox "Super!" Else 'ICI Cas du clic sur Non MsgBox "Pas Glop..." End If
<italique>Cordialement,
Franck'Pensez aux balises de code : bouton <>, 'Précisez le langage dans la liste déroulante. Ex : code java
-
Bonjour,
remplace ton msgbox "Ici, je coule..."
par :
Var = MsgBox("Confirmez-vous les données ? Si Oui, les données seront copiées, si non, corrigez les erreurs et recliquez sur le bouton.", vbYesNo)
If Var = vbYes Then
MsgBox "Ou veux-tu copier les données "
Else
Sheets("Entrées").Select
End If