OVH Cloud OVH Cloud

Faire BOUTON pour ANNULER saisie

13 réponses
Avatar
Cinémas Décavision
Bonjour Amis Pros d'Access2K,

Encore moi....
Je cherche à faire avec un bouton "ANNULER la saisie dans plusieurs champs
et revenir aux données qui étaient avant". Donc pour avoir la possibilité de
réparer une ERREUR au cas ou je suis en train de MODIFIER ce
formulaire/fiche et à la fin je m'apercois que je me suis trompé de fiche et
je voudrais REVENIR aux données qui étaient sur ce forms/fiche qui sert a
remplir un forms ou tout est non modifiable directement...
En un mot la fiche doit rester sans changement.

J'ai fait avec une macro car le VBA dur pour un néophite

Macro ANNULER : Restaurer - Annuler Evénement - Actualiser - Fermer

Mais pas bon surtout Annuler Evénement qui ne correspond pas à ce que je
veux...

Merci à tous.

Bernard

--
Bernard FANGET Movie Room Manager
Multiplexe Cinema DECAVISION - 7 avenue de Brogny
74000 ANNECY France

Fax : 04 50 52 58 31

pdg*decavision.fr ( Remplacer l'étoile par @ )
http://www.decavision.com/

10 réponses

1 2
Avatar
3stone
Salut,

"Cinémas Décavision"
| Je cherche à faire avec un bouton "ANNULER la saisie dans plusieurs champs
| et revenir aux données qui étaient avant". Donc pour avoir la possibilité de
| réparer une ERREUR au cas ou je suis en train de MODIFIER ce
| formulaire/fiche et à la fin je m'apercois que je me suis trompé de fiche et
| je voudrais REVENIR aux données qui étaient sur ce forms/fiche qui sert a
| remplir un forms ou tout est non modifiable directement...
| En un mot la fiche doit rester sans changement.


Tu appuies 2 fois sur la touche "Esc" qui est prévue pour cela ;-)

- le premier annulle les modif du champ
- le second annulle les modif de l'enregistrement

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
Cinémas Décavision
Bonjour 3Stones

Touche Escape...
OUAH trop bête, je n'y avait pas pensé.

Grand merci Pierre le DOLMEN.

Bernard
Avatar
Tisane
Bonjour Bernard et 3stone,

Touche Escape...
OUAH trop bête, je n'y avait pas pensé.


Ben dis donc... moi qui n'osait pas le proposer, persuadée que 3stone allait
nous faire 10 lignes de code ;-)

--
Tisane

Avatar
Cinémas Décavision
Re-Bonjour à tous
et surtout à 3 Stone qui m'a répondu.

Peut être que je peux faire un bouton qui donnerai la même fonction que
ESCAPE deux fois ???

Merci à tous
Bernard
Avatar
Tisane
Peut être que je peux faire un bouton qui donnerai la même fonction
que ESCAPE deux fois ???


Ah ! On y vient...

--
Tisane

Avatar
Gilles MOUGNOZ
Bonjour, Bernard
Pour ma part, j'utilise l'instruction VBA suivante:
SendKeys "{ESC 2}"
Mais, l'utilisation de l'instruction SendKeys n'étant pas très recommandée,
je m'étais abstenu.
Comme tu insistes... ;-)
--
Bonne continuation
-------------------------------------------------------------------------------------------
http://www.mpfa.info : c'est bonheur pour ton ordinateur !
-------------------------------------------------------------------------------------------
Re-Bonjour à tous
et surtout à 3 Stone qui m'a répondu.

Peut être que je peux faire un bouton qui donnerai la même fonction que
ESCAPE deux fois ???

Merci à tous
Bernard



Avatar
Tisane
Bonjour Gilles

Pour ma part, j'utilise l'instruction VBA suivante:
SendKeys "{ESC 2}"
Mais, l'utilisation de l'instruction SendKeys n'étant pas très
recommandée, je m'étais abstenu.
Comme tu insistes... ;-)


Il ne m'en voudra pas, mais je ne résiste pas à l'envie de coller la réponse
de 3stone lui-même à la même question... en 2002...
Et justement à quelqu'un qui a proposé SendKeys ;-))
------------------------
beuuurggg ;-))
Bad boy !
Place dans l'événement "Sur Avant mise à jour" du formulaire :
If vbNo = Msgbox("Voullez-vous sauvez ?",vbyesno,"Confirmer") Then
Cancel = True
End if
--
A+
Pierre (3stone)
--------------------------

--
Tisane

Re-Bonjour à tous
et surtout à 3 Stone qui m'a répondu.

Peut être que je peux faire un bouton qui donnerai la même fonction
que ESCAPE deux fois ???

Merci à tous
Bernard




Avatar
3stone
Bonjour,

"Gilles MOUGNOZ"
| Pour ma part, j'utilise l'instruction VBA suivante:
| SendKeys "{ESC 2}"
| Mais, l'utilisation de l'instruction SendKeys n'étant pas très recommandée,

Beeeerrrrg !


| je m'étais abstenu.


Oui ;-)


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
3stone
Salut,

"Cinémas Décavision"
| Peut être que je peux faire un bouton qui donnerai la même fonction que
| ESCAPE deux fois ???


Et si tu utilisait Access, tout bêtement avec ses assistants ?

Crée un bouton, opération sur enregistrement, annuler....

Cela pisse un code crade :

DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70

que tu te dépêche à remplacer par :

DoCmd.RunCommand acCmdUndo


;-)


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
3stone
Bonjour Tisane,

"Tisane"
[...]
| Ben dis donc... moi qui n'osait pas le proposer, persuadée que 3stone allait
| nous faire 10 lignes de code ;-)


Ce n'est pas parce que les "macro" Access me donne des haut-le-coeur
depuis toujours que je tiens à écrire du code :o)
(Mais il est vrai que j'aime les fonctions "sur mesure" ;-)

Par contre, je préfère utiliser d'abord les fonctions offertes par Access
avant d'écrire quoi que ce soit...

--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
1 2