Discussion :

[meumeu73.1]

Bonjour,

J'ai une userform dans laquelle j'ai des boutons radio, et je voudrai que suivant le bouton qui est sélectionné afficher ou masquer une listbox ou une txtbox.

Par avance merci pour votre aide

[spookyz]

Bonjour
essaye avec tonobjet.visible true ou false

[meumeu73.1]

j'ai mis ça et ça ne marche pas

Code :

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

If ProfilGP = True Then CSPEL.Visible = False Else CSPEL.Visible = True

[spookyz]

ce bout de code est dans le code de userform ou dans un module

[meumeu73.1]

dans le code de la userform

[parmi]

Essaie en ajoutant DoEvents et éventuellement Me.Repaint

[Theze]

Bonsoir,

Il te faut utiliser l'évènement "Change" des OptionButtons :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
Private Sub OptionButton1_Change()
 
    ListBox1.Visible = OptionButton1.Value
 
End Sub
 
 
Private Sub OptionButton2_Change()
 
    TextBox1.Visible = OptionButton2.Value
 
End Sub

Hervé.

et tu peux même utilise l'évènement "Change" d'un seul bouton, il te suffit de mettre la propriété "Visible" du contrôle que tu veux cacher à l'ouverture :

Code :

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

1
2
3
4
5
6
7
 
Private Sub OptionButton1_Change()
 
    ListBox1.Visible = OptionButton1.Value
    TextBox1.Visible = OptionButton2.Value
 
End Sub

Hervé.

[meumeu73.1]

Merci beaucoup cela fonctionne.