Afficher/masquer une Text ou listbox

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

Bonjour
essaye avec tonobjet.visible true ou false

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

Code:

---

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

---

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

dans le code de la userform

Essaie en ajoutant DoEvents et éventuellement Me.Repaint

Bonsoir,

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

Code:

---

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:

---

1 2 3 4 5 6 7

Private Sub OptionButton1_Change()   ListBox1.Visible = OptionButton1.Value TextBox1.Visible = OptionButton2.Value   End Sub

---

Hervé.

Merci beaucoup cela fonctionne.