Choix depuis message box

Résolu
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
A voir également:

2 réponses

pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
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
0
Philou99.ch
 
Merci pour votre solution et le temps pris pour me répondre.
Amicalement
0
melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   155
 
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
0
Philou99.ch
 
Merci pour votre solution et le temps pris pour me répondre.
Je la testerai dès mardi lors de mon retour au travail
Amicalement
0