Posez votre question Signaler

Commande du bouton dans un MSGBOX en VBA [Résolu]

bobtipitt - Dernière réponse le 22 mars 2008 à 18:38
Bonjour,
voici mon probleme,
Je veux que dans mon MSGBOX il a les boutons No et Yes moi je veux programmer le boutton No pourque l'userForm1 apparait voici le code qui ne functionne pas
Private Sub CommandButton1_Click()
Unload UserForm1
Collem = Range("B1").Value
MsgBox "Vous avez choisie " & Collem & " comme lettre?", vbYesNo
Select Case Res
Case vbNo
Load UserForm1
UserForm1.Show
End Select
End Sub
Lire la suite 

Commande du bouton dans un MSGBOX en VBA »

2 réponses
Réponse
+0
moins plus
Bonjour,

Il faut employer MsgBox comme une fonction et non une instruction

Private Sub CommandButton1_Click()
dim reponse as integer

Unload UserForm1
Collem = Range("B1").Value
reponse = MsgBox ("Vous avez choisie " & Collem & " comme lettre?", vbYesNo)

Select Case reponse
Case vbNo
Load UserForm1
UserForm1.Show

End Select
End Sub
Ajouter un commentaire
Réponse
+0
moins plus
merci
Ajouter un commentaire
Ce document intitulé « Commande du bouton dans un MSGBOX en VBA » issu de CommentCaMarche (www.commentcamarche.net) est mis à disposition sous les termes de la licence Creative Commons. Vous pouvez copier, modifier des copies de cette page, dans les conditions fixées par la licence, tant que cette note apparaît clairement.
Dossier à la une
Passage au tout numérique : quel coût pour les particuliers ?