Sur fermeture de mon formulaire, je demande confirmation en cas de
modification
J'ai bien la msgbox avec la demande de modification, mais que je réponde oui
ou non, la modification s'effectue ???
Voilà le code utilisé :
----------------------------------------------------------------------------
--------------------------
Private Sub Form_AfterUpdate()
'Demande confirmation modification
If MsgBox("Confirmez-vous les modifications ?", vbYesNo,
"Modifications") = vbNo Then
Me.Undo
Cancel = True
End If
End Sub
----------------------------------------------------------------------------
-------------------------
Pouvez-vous m'aider, Merci
Patrice
(Question subsidiaire, peut-on en plus ajouter une image dans la msgbox type
"VbExclamation" et si oui où le placer ?)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre CFI [mvp]
bonjour ce serait mieux sur beforeupdate
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "PO2B" a écrit dans le message de news:
Bonjour à tous,
Sur fermeture de mon formulaire, je demande confirmation en cas de modification
J'ai bien la msgbox avec la demande de modification, mais que je réponde oui ou non, la modification s'effectue ???
Voilà le code utilisé : ---------------------------------------------------------------------------- -------------------------- Private Sub Form_AfterUpdate()
'Demande confirmation modification If MsgBox("Confirmez-vous les modifications ?", vbYesNo, "Modifications") = vbNo Then Me.Undo Cancel = True End If
End Sub ---------------------------------------------------------------------------- -------------------------
Pouvez-vous m'aider, Merci
Patrice
(Question subsidiaire, peut-on en plus ajouter une image dans la msgbox type "VbExclamation" et si oui où le placer ?)
Merci
bonjour
ce serait mieux sur beforeupdate
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
http://users.skynet.be/mpfa/
Site perso
http://access.cfi.free.fr
"PO2B" <PO2B@PO2B.COM> a écrit dans le message de news:u8JurPJnEHA.1992@TK2MSFTNGP10.phx.gbl...
Bonjour à tous,
Sur fermeture de mon formulaire, je demande confirmation en cas de
modification
J'ai bien la msgbox avec la demande de modification, mais que je réponde oui
ou non, la modification s'effectue ???
Voilà le code utilisé :
----------------------------------------------------------------------------
--------------------------
Private Sub Form_AfterUpdate()
'Demande confirmation modification
If MsgBox("Confirmez-vous les modifications ?", vbYesNo,
"Modifications") = vbNo Then
Me.Undo
Cancel = True
End If
End Sub
----------------------------------------------------------------------------
-------------------------
Pouvez-vous m'aider, Merci
Patrice
(Question subsidiaire, peut-on en plus ajouter une image dans la msgbox type
"VbExclamation" et si oui où le placer ?)
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer http://users.skynet.be/mpfa/ Site perso http://access.cfi.free.fr "PO2B" a écrit dans le message de news:
Bonjour à tous,
Sur fermeture de mon formulaire, je demande confirmation en cas de modification
J'ai bien la msgbox avec la demande de modification, mais que je réponde oui ou non, la modification s'effectue ???
Voilà le code utilisé : ---------------------------------------------------------------------------- -------------------------- Private Sub Form_AfterUpdate()
'Demande confirmation modification If MsgBox("Confirmez-vous les modifications ?", vbYesNo, "Modifications") = vbNo Then Me.Undo Cancel = True End If
End Sub ---------------------------------------------------------------------------- -------------------------
Pouvez-vous m'aider, Merci
Patrice
(Question subsidiaire, peut-on en plus ajouter une image dans la msgbox type "VbExclamation" et si oui où le placer ?)
Merci
Yann
Salut, If Msgbox("Blabla",vbYesNo + VbExclamation) = .........
Bye Yann
-----Message d'origine----- Bonjour à tous,
Sur fermeture de mon formulaire, je demande confirmation en cas de
modification
J'ai bien la msgbox avec la demande de modification, mais que je réponde oui
ou non, la modification s'effectue ???
Voilà le code utilisé : --------------------------------------------------------- -------------------
-------------------------- Private Sub Form_AfterUpdate()
'Demande confirmation modification If MsgBox("Confirmez-vous les modifications ?", vbYesNo,
"Modifications") = vbNo Then Me.Undo Cancel = True End If
End Sub --------------------------------------------------------- -------------------
-------------------------
Pouvez-vous m'aider, Merci
Patrice
(Question subsidiaire, peut-on en plus ajouter une image dans la msgbox type
"VbExclamation" et si oui où le placer ?)
Merci
.
Salut,
If Msgbox("Blabla",vbYesNo + VbExclamation) = .........
Bye
Yann
-----Message d'origine-----
Bonjour à tous,
Sur fermeture de mon formulaire, je demande confirmation
en cas de
modification
J'ai bien la msgbox avec la demande de modification,
mais que je réponde oui
ou non, la modification s'effectue ???
Voilà le code utilisé :
---------------------------------------------------------
-------------------
--------------------------
Private Sub Form_AfterUpdate()
'Demande confirmation modification
If MsgBox("Confirmez-vous les modifications ?",
vbYesNo,
"Modifications") = vbNo Then
Me.Undo
Cancel = True
End If
End Sub
---------------------------------------------------------
-------------------
-------------------------
Pouvez-vous m'aider, Merci
Patrice
(Question subsidiaire, peut-on en plus ajouter une image
dans la msgbox type