Access Evenements sur "click" et "s

Bonjour,


J'ai créé un formulaire qui contient des champs calculés. Je sais que cela ne se fait pas, mais je voudrais mémoriser un champ calculé dans ma table (à savoir des points de fidélité).


Il s'agit en fait d'un formulaire de caisse. J'ai d'un côté les services dans un sous frm, de l'autre les forfaits, dans un autre sous frm. Dans le formulaire principal, j'ai donc un champ qui additionne le montant des prestations.

Le principe est simple : 1€ = 1 point de fidelité.

J'ai donc écrit un code VBA qui me sert à mémoriser dans mon champ Points_Fidelite_Client, la valeur du montant des prestations + ce qui existait avant, à savoir :

Dim RM As Variant
RM = Forms![TEST]![nvpoint]
Me.[Points_Fidelite_Client] = Me.[Points_Fidelite_Client] + RM
Me.Refresh
...

Le problème est le suivant :

Lorsque je créé un évenement sur click du champ [Points_Fidelite_Client], tout fonctionne à merveille, le champ [Points_Fidelite_Client] enregistre la valeur du champ ici [nvpoint], je ferme, je réouvre, la valeur a bien été calculée et enregistrée.

Mais vous avouerez que ce n'est pas pratique de cliquer sur le champ pour que la mise à jour du champ se fasse. Le problème est que lorsque je créé un évenement, lorsque je mets mon code sur la sortie par exemple, rien ne se passe, pire il me dit que ma syntaxe de code :

Me.[Points_Fidelite_Client] = Me.[Points_Fidelite_Client] + RM

...est mauvaise :s

J'ai tenté de créé une fonction, mais je ne sais pas comment reformuler la syntaxe que j'ai faite. Apparemment, elle ne fonctionne que lorsque je suis sur le formulaire, et seulement sur les évenements de type "click"...

Je pensais faire une fonction et l'appeler grâce à la macro de sortie de mon formulaire, et taper un code du style :

Dim RM As Variant
RM = Forms![TEST]![nvpoint]
Me.[Points_Fidelite_Client] = Me.[Points_Fidelite_Client] + RM
Me.Refresh
...

Mais cela ne fonctionne pas. Je pense que c'est le "Me." qui pose problème, peut être faut-il spécifier le chemin entier, mais n'ayant jamais coder en VBA, j'ai du mal à trouver la bonne syntaxe, pourriez vous m'aiguiller ?


Je ne sais pas si l'explication est assez complète, je reste en stand by, et reviens checker les réponses dans l'aprem ;)


Merci de votre aide !