Discussion :

[Titans36]

Bonjour à tous,

voilà le petit soucis que je rencontre.

J'ai un userform qui comprends 4 checkbox et 30 textbox

en cliquant sur le premier textbox
j'ai 5 textbox qui doivent se dévérouiller.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub CbxCOM_Click()
 
If CbxCOM.Value = True Then
 
Textbox1.Enabled = True
Textbox3.Enabled = True
Textbox7.Enabled = True
Textbox8.Enabled = True
Textbox10.Enabled = True
 
else: end if
end sub

je cherche le moyen de regrouper ses 5 lignes en 1.
du style :

Code :

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

1
2
3
4
5
6
7
8
Private Sub CbxCOM_Click()
 
If CbxCOM.Value = True Then
 
Textbox(1,3,7,8,10).Enabled = True
 
else: end if
end sub

Naturellement cela ne marche pas. Je ne sait pas si cela est possible ou pas.

Et par anticipation à la question "pourquoi ?":
Ben parce que
Sérieusement, je sait que le code marche , mais j'aime bien que les codes soit épurée

D'avance un grand merci pour votre aide

[Souri84]

A ma connaissance, il n'est pas possible de le faire....

Après peut être que je me trompe... et si c'est le cas, je suis preneur de la solution...