OVH Cloud OVH Cloud

Correction automatique de la valeur d'1 champs

2 réponses
Avatar
Stéphane Lavergne
Bonjour,

Dans 1 formulaire, j'ai 1 contrôle Cadre1 qui peut avoir pour valeur celle
d'1 des 4 boutons poussoirs qui sont dans ce cadre.

Si je clique le bouton poussoir 4 (If Cadre1.Value=4), j'effectue 1 petit
traitement de vérification dans Cadre1_BeforeUpdate.
Le résultat de ce traitement est :
Tout est OK, le BP4 est enfoncé.
Sinon, j' ai 1 MsgBox qui me laisse le choix soit d'annuler le clic sur le
BP4 (cancel=true) pour permettre d'autres modifications manuelles sur le
formulaire, soit de corriger automatiquement en enfoncant le BP3 à la place
du BP4 (me.Cadre1=3).
Mais cette ligne (me.cadre1=3) me génère 1 erreur :
Erreur d'exécution '-2147352567 (800200009)':
La macro ou fonction attribuée à la propriété Avant MAJ ou Valide si pour ce
champ empêche Microsoft Access d'enregistrer les données dans le champ.

Existe-t-il 1 moyen de corriger automatiquement la valeur d'1 champs avant
sa mise à jour ?

Merci d'avance pour votre aide

--
Cordialement,

Stéphane

2 réponses

Avatar
Xavier HUE
Bonjour Stéphane,

Déplace ta vérification dans afterUpdate ou Click du cadre.

Cordialement
Avatar
Stéphane Lavergne
Merci Xavier,

Le problème est que je dois avoir la possibilité (par 1 msgbox) soit
d'annuler le clic soit de corriger le click.

Le 1er se fait obligatoirement ds before update et le 2e ds after update

Forcément... ça coince...

Je crois qu'il peut y avoir 1 solution en fait :
je crée 1 variable friend ds 1 module
je la met à 0 au debut du before update
apres le msgbox, si je dois corriger, je met la variable à 1
je n'ai plus qu'à vérifier dans after update la valeur de cette variable
si 1, je corrige le click

je vais essayer ça

Stéphane

----- Original Message -----
"Xavier HUE" a écrit dans le message de
news:1990501c41c7e$d10ca3a0$
Bonjour Stéphane,

Déplace ta vérification dans afterUpdate ou Click du cadre.

Cordialement