Boutons vbOKCancel VBA
Résolu
SOLEO
Messages postés
28
Statut
Membre
-
SOLEO Messages postés 28 Statut Membre -
SOLEO Messages postés 28 Statut Membre -
Bonjour,
Je débute en VBA .
J'ai créé un formulaire dans lequel j'ai entre autre un bouton "Annuler".
Lorsque je clique sur mon bouton "Annuler" s'ouvre une msgbox pour demander confirmation.
Cette msg box contien un bouton "ok" et un "annuler".
Mon problème est que je n'arrive pas à faire en sorte de revenir sur mon formulaire lorsque "annuler" est cliqué et de fermer mon formulaire si le bouton "ok" est cliqué.
J'avais écris cela...
Private Sub Annuler_Click()
MsgBox "Voulez-vous vraiment quitter le formulaire?", 49, "Espace Infos Agents"
If vbOk_click Then
Formentree.Hide
End If
End Sub
Je débute en VBA .
J'ai créé un formulaire dans lequel j'ai entre autre un bouton "Annuler".
Lorsque je clique sur mon bouton "Annuler" s'ouvre une msgbox pour demander confirmation.
Cette msg box contien un bouton "ok" et un "annuler".
Mon problème est que je n'arrive pas à faire en sorte de revenir sur mon formulaire lorsque "annuler" est cliqué et de fermer mon formulaire si le bouton "ok" est cliqué.
J'avais écris cela...
Private Sub Annuler_Click()
MsgBox "Voulez-vous vraiment quitter le formulaire?", 49, "Espace Infos Agents"
If vbOk_click Then
Formentree.Hide
End If
End Sub
2 réponses
-
Bonjour,
Il faut récupérer la réponse de l'utilisateur dans une variable:
Private Sub Annuler_Click() Dim rep As Long rep = MsgBox ("Voulez-vous vraiment quitter le formulaire?", VbOkNo, "Espace Infos Agents" If rep = VbNo Then Exit Sub UnLoad Formentree End Sub
;o)
-
Impec !!! ça marche... merci beaucoup... C'est vrai que c'est pas simple de débuter mais bon il faut bien un début :)
encore merci! :)