OVH Cloud OVH Cloud

Condition si et case à cocher

10 réponses
Avatar
squeepy
Bonjour

Qu'est ce qui ne vas :
If Coch_Oui.Enabled = True Then
Txt_Resultat.Enabled = False
ElseIf Coch_Oui.Enabled = False Then
Txt_REsultat.Enabled = True

En fait, quand je coche oui, la zone de texte resultat est grisé donc non
active, ca c'est ok. Mais quand je coche non, ca reste grisé, comment faire
pour que quand je coche non, ca redevient actif?

--
Merci de votre aide

10 réponses

Avatar
Gafish
squeepy wrote:
Bonjour


Bonjour,

Qu'est ce qui ne vas :
If Coch_Oui.Enabled = True Then
Txt_Resultat.Enabled = False
ElseIf Coch_Oui.Enabled = False Then
Txt_REsultat.Enabled = True


Essaie plutôt, dans l'evenement clic de ta case à cocher :

If Me.Coch_Oui.Value = -1 then
Me.TxtResultat.Enabled = False
Else
Me.TxtResultat.Enabled = True
End If

Arnaud
--
Charte du forum : http://www.mpfa.info/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
squeepy
il me dit
expression sans paramètres
pour If Me.Coch_Oui.Value = -1 then
Ce sont des cases à cocher dans un groupe d'option

--
Merci de votre aide



squeepy wrote:
Bonjour


Bonjour,

Qu'est ce qui ne vas :
If Coch_Oui.Enabled = True Then
Txt_Resultat.Enabled = False
ElseIf Coch_Oui.Enabled = False Then
Txt_REsultat.Enabled = True


Essaie plutôt, dans l'evenement clic de ta case à cocher :

If Me.Coch_Oui.Value = -1 then
Me.TxtResultat.Enabled = False
Else
Me.TxtResultat.Enabled = True
End If

Arnaud
--
Charte du forum : http://www.mpfa.info/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
squeepy
et je n'ai pas d'événement clic a cause du groupe d'option je crois, je suis
entrain de tester sur gotfocus
--
Merci de votre aide



squeepy wrote:
Bonjour


Bonjour,

Qu'est ce qui ne vas :
If Coch_Oui.Enabled = True Then
Txt_Resultat.Enabled = False
ElseIf Coch_Oui.Enabled = False Then
Txt_REsultat.Enabled = True


Essaie plutôt, dans l'evenement clic de ta case à cocher :

If Me.Coch_Oui.Value = -1 then
Me.TxtResultat.Enabled = False
Else
Me.TxtResultat.Enabled = True
End If

Arnaud
--
Charte du forum : http://www.mpfa.info/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Gafish
squeepy wrote:
il me dit
expression sans paramètres
pour If Me.Coch_Oui.Value = -1 then
Ce sont des cases à cocher dans un groupe d'option


En ce cas, il faut que tu testes la valeur du groupe :

If Me.TonCadre = ...

Arnaud
--
Charte du forum : http://www.mpfa.info/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Eric
Bonjour,

Sur l'évènement après MAJ du groupe d'options, tu testes la valeur du
groupe qui sera 1 ou 2 si tu as 2 cases Oui et Non dans cet ordre
Private Sub LeGroupe_AfterUpdate()
if legroupe=1 then
Txt_Resultat.Enabled = False
else
Txt_Resultat.Enabled = True
end if
End Sub


et je n'ai pas d'événement clic a cause du groupe d'option je crois, je suis
entrain de tester sur gotfocus


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
squeepy
Pourrais tu me le faire + détailler stp
--
Merci de votre aide



squeepy wrote:
il me dit
expression sans paramètres
pour If Me.Coch_Oui.Value = -1 then
Ce sont des cases à cocher dans un groupe d'option


En ce cas, il faut que tu testes la valeur du groupe :

If Me.TonCadre = ...

Arnaud
--
Charte du forum : http://www.mpfa.info/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Gafish
squeepy wrote:
Pourrais tu me le faire + détailler stp


Regarde le post d'Eric, qui t'a fait le code plus détaillé :)

Arnaud
--
Charte du forum : http://www.mpfa.info/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
squeepy
Merci de toutes vos infos.

J'ai tout compte fait réussi avec les infos de Gafish.
Merci à vous 2




Bonjour,

Sur l'évènement après MAJ du groupe d'options, tu testes la valeur du
groupe qui sera 1 ou 2 si tu as 2 cases Oui et Non dans cet ordre
Private Sub LeGroupe_AfterUpdate()
if legroupe=1 then
Txt_Resultat.Enabled = False
else
Txt_Resultat.Enabled = True
end if
End Sub


et je n'ai pas d'événement clic a cause du groupe d'option je crois, je suis
entrain de tester sur gotfocus


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr




Avatar
3stone
re,

"squeepy"
| Merci de toutes vos infos.
|
| J'ai tout compte fait réussi avec les infos de Gafish.
| Merci à vous 2


Qu'est ce qui ne va pas ? (vu que tu relance ;-)


Ce qui m'étonne, c'est que tu dis avoir un groupe d'options
et tu ne parle que d'une coche...

Si tu as réellement un groupe d'options, tu ne peux cocher
qu'une seule coche à la fois ! Est-ce bien le cas ?
Si oui, à quoi servent les autres coches ?


--
A+
Pierre (3stone) Access MVP
Perso: http://www.3stone.be/
Conseils MPFA: http://www.mpfa.info/
Avatar
squeepy
ce n'st pas celui la dont je te parle
je te parle de "condtion si sur zone de texte et case à cocher" en date du 23
merci
--
Merci de votre aide



re,

"squeepy"
| Merci de toutes vos infos.
|
| J'ai tout compte fait réussi avec les infos de Gafish.
| Merci à vous 2


Qu'est ce qui ne va pas ? (vu que tu relance ;-)


Ce qui m'étonne, c'est que tu dis avoir un groupe d'options
et tu ne parle que d'une coche...

Si tu as réellement un groupe d'options, tu ne peux cocher
qu'une seule coche à la fois ! Est-ce bien le cas ?
Si oui, à quoi servent les autres coches ?


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