Discussion :

[abdello]

salut à tous
sur une userform j'ai 36 checkbox et 36 textbox liés (par exp textbox1 et 2 sont liés à checkbox1 et 2) en sélectionnant checkbox1 je désactive checkbox2 j'active textbox1 et désactive textbox2 (en désélectionnant je réactive les deux checkbox et désactive les deux texbox)
je voudrais répéter la même action sur l'ensembles des checkbox de la userform
j'ai le code suivant pour les checkbox1 et 2 et textbox1 et 2
_________

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
    CheckBox2.Enabled = False
    TextBox1.Enabled = True
    TextBox2.Enabled = False
Else
End If
If CheckBox1.Value = False Then
    CheckBox1.Enabled = True
    CheckBox2.Enabled = True
    TextBox1.Enabled = False
    TextBox2.Enabled = False
Else
End If
End Sub

________

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
    CheckBox1.Enabled = False
    TextBox2.Enabled = True
    TextBox1.Enabled = False
Else
End If
If CheckBox2.Value = False Then
    CheckBox1.Enabled = True
    CheckBox2.Enabled = True
    TextBox1.Enabled = False
    TextBox2.Enabled = False
Else
End If
End Sub

___________
comment faire pour éviter de répéter le même code pour les 36 checkbox
merci

[verredewhisky]

Je pense que tu es obligé de tout taper. Ca te prendra de toute façon moins de temps que de chercher une solution lol.

[issoram]

Bonjour,

Tu pourrais créer ces contrôles de manière dynamique et gérer l’événement change de manière unique. Regarde un peu par ici

[Didier Gonard]

Bonjour,

Tu as intérêt à te pencher sur l'utilisation d'un module de classe simple et de collections

vois le code dans le fil de FAq nommé (mal nommé, mais l'approche du code OK) :

Comment identifier le contrôle utilisé dans la feuille de calcul ?

http://excel.developpez.com/faq/?page=OleObject

cordialement

Didier