Discussion :

[lguez]

bonjour,

j'ai un petit soucis access:
j'ai un formulaire avec un champs texte et un bouton et j'aimerais que le bouton se désactive si le champ texte est vide.
pour l'instant ce qu j'ai fait est qu'a chaque événement KEY-UP dans le champs texte je vérifie s'il est vide ou non. mais comme il n'est pas mis à jour immédiatement, j'ai rajouté la commande Me.Refresh après avoir récupérer la position de mon curseur (SelStart) et la remet à jour après le refresh. le problème est que dès que je tape un espace le refresh me l'enlève, je n'arrive donc pas à savoir si mon champs contient des caractère ou non !

quelqu'un aurait-il une idée pour résoudre mon problème ? ou y-a-t-il une autre façon de faire nettement plus simple?

[loufab]

Bonjour,
Pour désactiver le bouton :

Dans l'événement Sur activation mettre le code suivant :

Code :

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

me.monBouton.enabled = not isnull(me.moncontroletexte)

où monBouton est le nom du bouton et moncontroletexte est le nom du contrôle texte.

Et dans l'évènement Après MAJ de la zone de texte mettre le même code.

Les selstart, refresh et compagnie ne sont pas fait pour ça.

Cordialement,

[lguez]

Le problème est que je souhaites activer ou désactiver un bouton sur la frappe de caractères dans un champ texte.
si ce champs contient au moins 1 caractère alors le bouton est activé sinon je le désactive (si je retire des caractères, dès que le champs est vide, le bouton doit se regriser)..
je dois donc utilisé un événement qui s'active à chaque modification de ce champs (c'est pour cela que j'ai mis le code sous l'événement key-up) est vérifier le contenu du champ. mais quand je m'arrête dans la procédure, celui-ci n'est pas actualisé. C'esqt pour cette raison que j'y ai insérer l'instruction "me.refresh".
Le problème de me.refresh est qu'il me replace en début de champs et donc le caractère suivant tapé remplace le caractère déjà présent.
C'est pour cela que j'ai récupérer la position de mon curseur par selstart avant le refresh et qu je repositionne mon curseur après exécution du refresh.
Ceci fonctionnait pas trop mal jusqu'a ce que l'on tape dans le champ des espace. Le refresh supprime les espace finaux ce qui fait que l'on ne peux pas taper de texte avec des espaces.

Voilà j'espère que c'est clair. il y a surement plus simple dans ce cas je suis preneur. (pour info je viens de commencer à utiliser access 2010 et je connais bien le vba d'excel.

[loufab]

Dans key-up essaye ceci :

Code :

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

me.monBouton.enabled = not isnull(me.moncontroletexte.text)

ça peut marcher.

Cordialement,

[lguez]

Ok c'était tellement simple merci (avec une petite modif car quand on revient en arrière il faut tester la chaîne vide).

en fait je faisait cela:

Code :

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

BtnEnreg.Enabled = Not IsNull(Me.Txt_Cat.Value)

et il fallait faire ceci:

Code :

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

Me.BtnEnreg.Enabled = Not IsNull(Me.Txt_Cat.Text) And (Me.Txt_Cat.Text <> "")

Y a t'il une différence entre champ.Value et champ.Text

Merci encore

[loufab]

Absolument ! Et une grosse différence !

Value est la valeur enregistrée.
Text est la valeur en cours de saisie.



Si bien qu'on peut avoir un Value différent d'un Text.

[lguez]

ok merci - mon pb venait donc de là, j'utilisais .value !!!