Discussion :

[lou.souleu]

Bonjour,

Je voudrais afficher ou ne pas afficher des contrôles texte sur le clic des éléments d'un groupe d'option.

Il y a un sujet qui traite de celà mais avec des cases à cocher et je n'arrive pas à le faire fonctionner avec les cases d'un groupe d'option.

Est ce réalisable

[Vesta]

Si ton groupe d'option s'apelle cadre0

en VBA

Code :

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

1
2
3
4
5
6
7
Sub Form_Current()
if me![Valeur_test]=True ou 10 ou >1000 enfin comme tu veux then
Me.Cadre0.Visible = False 'affiche
else 
Me.Cadre0.Visible = True 'cache
end if 
end sub

Merci d'utiliser les balises code obligatoires | cafeine

voila ;-)

[lou.souleu]

Bonjour,
J'ai testé ton code mais cela ne marche pas. J'ai ajouté Then après True car il y avais une erreur de compilation. Voici le code

Code :

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

1
2
3
4
5
6
7
Private Sub Form_Current()
If Me![Prix_unitaire_Étiquette] = True Then
Me.Cadre85.Visible = False 'affiche
Else
Me.Cadre85.Visible = True 'cache
End If
End Sub

Merci d'utiliser les balises code obligatoires | cafeine

A l'ouverture de mon form il y a une erreur d'éxécution 438.
Par contre je vois pas comment je pourrai mettre des affichages d'étiquettes textes différents en cliquant sur les éléments (3 éléments) du groupe d'option.
Peux tu m'en dire plus : :

[smicky77]

Code :

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

1
2
3
4
5
6
7
8
 
Private Sub Form_Current()
If Me![Prix_unitaire_Étiquette] = True Then
Me.Cadre85.Visible = False 'affiche
Else
Me.Cadre85.Visible = True 'cache
End If
End Sub

Salut,
Ce code est bon sauf que ton [Prix_unitaire_Étiquette] ne doit pas avoir une valeur "Vrai" ou "Faux" mais un prix, donc un nombre non :
Alors remplace "= True" par autre chose du genre = 10 ou > 20......

Alain

[pgz]

Bonsoir,

Quelles sont les valeurs possibles de ton groupe d'options?
Quelle est la logique d'affichage suivant chacune de ces valeurs?

Détail :
.Visible = True affiche et pas l'inverse.

pgz

[lou.souleu]

Bonjour,

Mon groupe d'option comporte 3 options:
Gestion
Prestation
Cotisation

Je voudrai que sur chaque clic corresponde l'affichage de 2 ou 3 contrôles textes ou étiquette texte.
C'est en fait un form facture sur lequel je voudrai changer certains éléments selon l'option validée.

Il est vrai que je ne me suis pas trop bien expliqué au début.

Lou.souleu

[Sinclar]

Salut,

Ton groupe d'option appelons Option1
Tes options ont une valeur (à vérifier dans les propriétés de chacune) mais en principe les valeurs attribuées doivent être
Gestion =1
Prestation =2
Cotisation =3

Ensuite sur l'évènemement Option1_AfterUpdate
Tu affiches ou tu masques les contrôles de ton choix

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Select Case Me.Option1
Case 1
Me.ctl1.visible = True
Me.ctl2.visible = false
etc
Case 2
...
Case 3
...
End Select

Enfin, si j'ai bien compris

[pgz]

C'était bien le sens de ma question.
Sinclar a répondu.
pgz

[lou.souleu]

Bonjour,

Merci beaucoup çà marche à la perfection.

A l'avenir j'essayerai de poser mes questions avec beaucoup plus de précision.

Abientôt