Je fais une validation before update, voici mon code:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Not IsNull(Me.DteConf) And IsNull(Me.CodeDestRes) Then
MsgBox "Destinataire pour résolution obligatoire!"
Cancel = True
End If
End Sub
La validation se fait bien, sauf quand je viens pour fermer mon formulaire,
alors j'ai le message "Impossible d'enregistrer cet enregistrement pour
l'instant"
Je ne veux pas qu'apparaisse ce message, mais je ne sais pas comment faire.
donc le message système s'affiche avant l'événement beforeupdate et on ne pourra pas l'intercepter. essaie de le faire sans le test Private Sub Form_BeforeUpdate(Cancel As Integer) ' If Not IsNull(Me.DteConf) And IsNull(Me.CodeDestRes) Then ' MsgBox "Destinataire pour résolution obligatoire!" Me.Undo Cancel = True ' End If End Sub
tu devrais voir ce qui se passe car en demandant la fermeture, ça va effacer les saisies éventuelles et revenir dessus. pourrais-tu m'envoyer le formulaire et la table et les éléments indispensables, par mail, en zip si possible et tu enlèves XYZ. dans mon adresse. -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
Re-bonjour Raymond,
Je t'ai envoyé ma base, l'as-tu regardée?
donc le message système s'affiche avant l'événement beforeupdate et on ne
pourra pas l'intercepter.
essaie de le faire sans le test
Private Sub Form_BeforeUpdate(Cancel As Integer)
' If Not IsNull(Me.DteConf) And IsNull(Me.CodeDestRes) Then
' MsgBox "Destinataire pour résolution obligatoire!"
Me.Undo
Cancel = True
' End If
End Sub
tu devrais voir ce qui se passe car en demandant la fermeture, ça va effacer
les saisies éventuelles et revenir dessus.
pourrais-tu m'envoyer le formulaire et la table et les éléments
indispensables, par mail, en zip si possible et tu enlèves XYZ. dans mon
adresse.
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
donc le message système s'affiche avant l'événement beforeupdate et on ne pourra pas l'intercepter. essaie de le faire sans le test Private Sub Form_BeforeUpdate(Cancel As Integer) ' If Not IsNull(Me.DteConf) And IsNull(Me.CodeDestRes) Then ' MsgBox "Destinataire pour résolution obligatoire!" Me.Undo Cancel = True ' End If End Sub
tu devrais voir ce qui se passe car en demandant la fermeture, ça va effacer les saisies éventuelles et revenir dessus. pourrais-tu m'envoyer le formulaire et la table et les éléments indispensables, par mail, en zip si possible et tu enlèves XYZ. dans mon adresse. -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
Raymond [mvp]
je viens de te la retourner avec les modifs.
on ne peut pas passer par les événements normaux, j'ai placé un bouton de fermeture qui se valide selon l'état du formulaire (événement dirty). je n'ai pas tout testé, je t'en laisse le soin.
voir les événement commande444.click form_load form_open form_current form_dirty
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jo" a écrit dans le message de news:
Re-bonjour Raymond,
Je t'ai envoyé ma base, l'as-tu regardée?
je viens de te la retourner avec les modifs.
on ne peut pas passer par les événements normaux, j'ai placé un bouton de
fermeture qui se valide selon l'état du formulaire (événement dirty).
je n'ai pas tout testé, je t'en laisse le soin.
voir les événement commande444.click
form_load
form_open
form_current
form_dirty
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jo" <rockett09AENLEVER@yahoo.ca> a écrit dans le message de news:
894D3CC1-FC10-4514-A285-B24B8315E103@microsoft.com...
on ne peut pas passer par les événements normaux, j'ai placé un bouton de fermeture qui se valide selon l'état du formulaire (événement dirty). je n'ai pas tout testé, je t'en laisse le soin.
voir les événement commande444.click form_load form_open form_current form_dirty
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jo" a écrit dans le message de news:
Re-bonjour Raymond,
Je t'ai envoyé ma base, l'as-tu regardée?
Jo
MERCI BEAUCOUP, ça marche bien.
Johanne
je viens de te la retourner avec les modifs.
on ne peut pas passer par les événements normaux, j'ai placé un bouton de fermeture qui se valide selon l'état du formulaire (événement dirty). je n'ai pas tout testé, je t'en laisse le soin.
voir les événement commande444.click form_load form_open form_current form_dirty
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jo" a écrit dans le message de news:
Re-bonjour Raymond,
Je t'ai envoyé ma base, l'as-tu regardée?
MERCI BEAUCOUP, ça marche bien.
Johanne
je viens de te la retourner avec les modifs.
on ne peut pas passer par les événements normaux, j'ai placé un bouton de
fermeture qui se valide selon l'état du formulaire (événement dirty).
je n'ai pas tout testé, je t'en laisse le soin.
voir les événement commande444.click
form_load
form_open
form_current
form_dirty
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jo" <rockett09AENLEVER@yahoo.ca> a écrit dans le message de news:
894D3CC1-FC10-4514-A285-B24B8315E103@microsoft.com...
on ne peut pas passer par les événements normaux, j'ai placé un bouton de fermeture qui se valide selon l'état du formulaire (événement dirty). je n'ai pas tout testé, je t'en laisse le soin.
voir les événement commande444.click form_load form_open form_current form_dirty
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
