Discussion :

[sayangma]

Bonjour ,
J'ai un formulaire continu avec la possibilité de saisir dans un controle pour chaque enregistrement. Je voudrais avoir un bouton "annuler saisie" qui permet de quitter le formulaire et d'annuler toutes les modifications.
J'ai essayé dans le bouton : Me.Form.Undo . Cela ne fonctionne pas.
puis j'ai essayé une routine récupérée :

Code :

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

1
2
3
4
5
6
Dim ctlZoneTexte As Control
For Each ctlZoneTexte In Me.Controls
If ctlZoneTexte.ControlType = acTextBox Then
ctlZoneTexte.Value = ctlZoneTexte.OldValue
End If
Next ctlZoneTexte

cette routine ne fonctionne que pour les contrôles de l'entête et du premier enregistrement. Elle ne passe pas à l'enregistrement suivant également présent à l'écran....
Merci d'avance à tous !

[yonnel]

Bonjour,

Une solution consiste à passer par une autre table temporaire.
Tu peux procéder ainsi:

• A l'ouverture du formulaire, tu copies ta table source dans une table temporaire
• Tu lies ton formulaire directement à cette table temporaire
• Ensuite, si les changements doivent être annulés, tu fermes simplement ton formulaire, et si les changements doivent être appliqués, tu peux remplacer ta table source par ta table temporaire

N'hésite pas à me dire si je ne suis pas assez clair dans mes explications!