Discussion :

[AuroreBezu]

Bonjour,

Je suis en train de faire des contrôles de validité sur clic d'un bouton "Annuler", Access 2007.
J'ai un formulaire et un sous-formulaire.
J'ai deja fait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
If Me.Dirty Then
        If vbYes = MsgBox("Etes-vous sûr de vouloir annuler la modification ?",  vbYesNo + vbQuestion) Then
        DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo
        DoCmd.Close
        End If
Else
        DoCmd.Close
End If

Ainsi je vérifie que rien n'a été modifié dans le formulaire, mais comment faire pour que cela vérifie aussi l'état du sous-formulaire ?
J'ai essayé de remplacer Me par le nom de mon sous formulaire et bien d'autres syntaxes.

Est ce que quelqu'un saurait faire ?

Merci d'avance!

Aurore.

[LedZeppII]

Bonjour,

la syntaxe est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.NomDuControleSousFormulaire.Form.Dirty

Mais il y a de grande chances que le bouton, en prenant le focus, fasse que les modifications s'enregistrent dans le sous-formulaire.
Ceci parce que l'enregistrement en cours de modifications dans le sous-formulaire va perdre le focus.

A+

[AuroreBezu]

Merci pour cette info, mon code fonctionne sans erreur maintenant
MAIS
il m'enregistre quand même l'info modifiée et sans me poser la question de contrôle de validité...

merci d'avance pour vos réponses!

Aurore.

[LedZeppII]

Bonsoir,

il m'enregistre quand même l'info modifiée et sans me poser la question de contrôle de validité...

Au niveau du formulaire ou du sous-formulaire ?

Pour le formulaire ton code m'a l'air bien.
Juste une remarque sur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

        DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo

On peut le remplacer par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

        Me.Undo

A+

[kan630]

Perso, J'essayerais de placer ce code sur le sous formulaire directement

[AuroreBezu]

Bonjour,

Pour vous répondre,

- cela m'enregistre les données dans le sous formulaire

- j'aimerais bien le spécifier pour le sous form aussi mais je ne sais pas comment...?

- pour le code à remplacer par le Me.Undo, je te remercie, j'ai simplement utilisé un code qu'un prof m'a donné, deja tout pret...

Merci à vous,

Aurore.