sélect. tt les textbox ds 1 USF

[Alexandre]

coucou tlm!

c encore moi, le novice...

j'aimerai sélectionner toutes les textboxes (environ 30) situées dans un USF pour leur affecter la propriété visible à false.
il doiy y avoir plus rapide que : textbox1.visible=false , textbox2.visible=false. ... ? ;p

 

[mDF]

Bonsoir,

Tu peux essayer :

Private Sub TBinvisible()
Dim Ct As Control
For Each Ct In UserForm1.Controls
If TypeName(Ct) = "TextBox" Then Ct.Visible = False
Next Ct
End Sub

Cordialement.
DIDIER

 

[Myta]

Bonsoir le Forum

Ou encore tu peux remplacer

If TypeName(Ct) = "TextBox" Then Ct.Visible = False

par

if typeof Ct is MsForms.TextBox then Ct.Visible = False

Mytå