Discussion :

[snoopy69]

Bonjour ... j'aimerais fermer un formulaire sans que les données que j'ai modifiées soient prises en compte ...

J'ai cherché dans la FAQ et je suis tombée sur cela :
http://<br /> http://access.develop...ermFrmSansSauv

voici ce que me dit ce lien :

L'idéal est de demander une confirmation.

Placez le code suivant dans l'évènement Avant MAJ du formulaire.

'variable stockant la réponse donnée dans la boite de dialogue

Code :

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

1
2
3
4
5
6
Dim intReponse As Integer 
'si il y a eu des modifications on demande la confirmation 
If Me.Dirty Then 'message pour l'utilisateur intReponse = MsgBox("Voulez-vous enregistrer ?", vbYesNoCancel, "Confirmation") Select Case intReponse Case vbYes ' oui est choisit, on ne fait rien puisque le ' comportement par defaut de Access est d'enregistrer. 
Case vbNo ' non est choisit donc on annule les modification 
Me.Undo Case vbCancel ' Annuler est choisit donc on annule la manipulation 
Cancel = True End Select End If

Remarque : en utilisant l'évènement Avant MAJ, vous aurez une demande de confirmation dans tous les cas : changement d'enregistrement, fermeture du formulaire....

En fait avec ce code ce que j'aimerais faire c'est l'introduire dans une procédure et lorsque je quitte sur mon bouton pour fermer le formulaire qu'il s'exécuter ... mais comme le dit le lien de la FAQ je dois :

Placez le code suivant dans l'évènement Avant MAJ du formulaire

Comment puis-je faire pour l'intégrer directement dans ma procédure ???

Merci de votre aide ...

[zoom61]

Salut,

Pour ma part pour résoudre ton problème, je rajoute dans mon formulaire 2 boutons : Ok & Annuler.
Sur le bouton Annuler, je rajoute sur l'évènement sur Clic :

Code :

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

1
2
Me.Undo
DoCmd.Close

Et cela ne prend pas en compte les modifications qui ont été faites.

[snoopy69]

Bonjour merci de ta réponse ... mais j'ai une question ...

Dans le formulaire que j'ai créer, sur certains champs j'ai rajouter du code sur perte focus qui me permet d'acutaliser mon formulaire ...

Si j'actualise un formulaire en utilisant UNDO cela "m'efface" seulement le dernier changement non ???

[zoom61]

Non normalement, cela annule la donnée de tous les champs qui ont été modifiés, cela revient à ce qu'il y avait à l'ouverture...