MsgBox
Résolu/Fermé
Serval07
Messages postés
15
Date d'inscription
mardi 16 octobre 2007
Statut
Membre
Dernière intervention
15 septembre 2008
-
23 oct. 2007 à 13:44
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 24 oct. 2007 à 14:58
Polux31 Messages postés 6917 Date d'inscription mardi 25 septembre 2007 Statut Membre Dernière intervention 1 novembre 2016 - 24 oct. 2007 à 14:58
4 réponses
Serval07
Messages postés
15
Date d'inscription
mardi 16 octobre 2007
Statut
Membre
Dernière intervention
15 septembre 2008
2
24 oct. 2007 à 10:23
24 oct. 2007 à 10:23
Bonjour, je viens de trouver la solution a mon problème.
Voici le code
Private Sub CommandButton1_Click()
answer = MsgBox("Are you sure you want to cancel the operations? ", vbYesNo + vbCritical, "Cabling Sheet") '
If answer = vbYes Then
Unload Me
End If
End Sub
Voici le code
Private Sub CommandButton1_Click()
answer = MsgBox("Are you sure you want to cancel the operations? ", vbYesNo + vbCritical, "Cabling Sheet") '
If answer = vbYes Then
Unload Me
End If
End Sub
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
24 oct. 2007 à 14:33
24 oct. 2007 à 14:33
Bonjour,
Oui c'est comme ça qu'il faut faire mais n'oublies pas de déclarer tes variables: Dim answer As Integer et que fait ton programme si l'utilisateur clique sur "NO" ???
;o)
Polux
Oui c'est comme ça qu'il faut faire mais n'oublies pas de déclarer tes variables: Dim answer As Integer et que fait ton programme si l'utilisateur clique sur "NO" ???
;o)
Polux
Serval07
Messages postés
15
Date d'inscription
mardi 16 octobre 2007
Statut
Membre
Dernière intervention
15 septembre 2008
2
24 oct. 2007 à 14:45
24 oct. 2007 à 14:45
Le programme continue comme il s`était rien passé.
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
24 oct. 2007 à 14:58
24 oct. 2007 à 14:58
dans ce cas le préciser par un Exit Sub