OVH Cloud OVH Cloud

methode

3 réponses
Avatar
mpas.mque
bonjour

j'ai un formulaire que je ferme avec DoCmd.close
mais l'astuce j'aimerais en cliquant sur le bouton fermer qu'il me propose 3
choix OUI NON OU ANNULER
j'ai essayé avec un MsgBox" voulez vous réellement fermer ?" uniquement le
bouton oui qui fonctionne les autres non ou annuler il me ferme le
formulaire quand même
puvez vous m aider svp

loic

3 réponses

Avatar
Gafish
Bonjour,

Il faut que tu testes la valeur de retour de ton msgbox.
Dans l'aide sur cette fonction tu trouveras les codes pour oui, non et
annuler.
Exemple :
Dim RepMsg
RepMsg = MsgBox("Voulez vous fermer ?", 4)
'6 c'est la valeur de retour du oui
If RepMsg = 6 Then
DoCmd.Close
End If

Arnaud

"mpas.mque" a écrit dans le message news:
41c1a194$0$10207$
bonjour

j'ai un formulaire que je ferme avec DoCmd.close
mais l'astuce j'aimerais en cliquant sur le bouton fermer qu'il me propose
3

choix OUI NON OU ANNULER
j'ai essayé avec un MsgBox" voulez vous réellement fermer ?" uniquement le
bouton oui qui fonctionne les autres non ou annuler il me ferme le
formulaire quand même
puvez vous m aider svp

loic




Avatar
Pierre CFI [mvp]
bonjour
entre autres
Dim x
x = MsgBox("On ferme?", vbYesNoCancel)
select case x
Case vbyes
....
case vbno
.....
case vbcancel
.....
end select

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"mpas.mque" a écrit dans le message de news:41c1a194$0$10207$
bonjour

j'ai un formulaire que je ferme avec DoCmd.close
mais l'astuce j'aimerais en cliquant sur le bouton fermer qu'il me propose 3
choix OUI NON OU ANNULER
j'ai essayé avec un MsgBox" voulez vous réellement fermer ?" uniquement le
bouton oui qui fonctionne les autres non ou annuler il me ferme le
formulaire quand même
puvez vous m aider svp

loic




Avatar
Gafish
Décidement, on a décidé d'être synchrone sur les réponses :)

"Pierre CFI [mvp]" a écrit dans le message news:
#
bonjour
entre autres
Dim x
x = MsgBox("On ferme?", vbYesNoCancel)
select case x
Case vbyes
....
case vbno
.....
case vbcancel
.....
end select

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"mpas.mque" a écrit dans le message de
news:41c1a194$0$10207$

bonjour

j'ai un formulaire que je ferme avec DoCmd.close
mais l'astuce j'aimerais en cliquant sur le bouton fermer qu'il me
propose 3


choix OUI NON OU ANNULER
j'ai essayé avec un MsgBox" voulez vous réellement fermer ?" uniquement
le


bouton oui qui fonctionne les autres non ou annuler il me ferme le
formulaire quand même
puvez vous m aider svp

loic