Checkbox imbriqué
Résolu
barondentraide
-
barondentraide -
barondentraide -
Bonjour à tous , avec ce code de départ :
j'aimerais que la CheckBox1 en plus d' afficher la ligne 120 fasse ceci :
if CheckBox1 = True Then
CheckBox5 = True
CheckBox6 = True
CheckBox7= True
Et si Checkbox1 = False
CheckBox5 = False
CheckBox6 = False
CheckBox7= False
Merci d'avance
Private Sub CheckBox1_Click()
If CheckBox1 = True Then Sheets("Rap_car").Rows("120:120").EntireRow.Hidden = False
If CheckBox1 = False Then Sheets("Rap_car").Rows("120:120").EntireRow.Hidden = True
End Sub
Private Sub CheckBox2_Click()
If CheckBox2 = True Then Sheets("Rap_car").Rows("121:121").EntireRow.Hidden = False
If CheckBox2 = False Then Sheets("Rap_car").Rows("121:121").EntireRow.Hidden = True
End Sub
Private Sub CheckBox3_Click()
If CheckBox3 = True Then Sheets("Rap_car").Rows("122:122").EntireRow.Hidden = False
If CheckBox3 = False Then Sheets("Rap_car").Rows("122:122").EntireRow.Hidden = True
End Sub
Private Sub CheckBox4_Click()
If CheckBox4 = True Then Sheets("Rap_car").Rows("123:123").EntireRow.Hidden = False
If CheckBox4 = False Then Sheets("Rap_car").Rows("123:123").EntireRow.Hidden = True
End Sub
j'aimerais que la CheckBox1 en plus d' afficher la ligne 120 fasse ceci :
if CheckBox1 = True Then
CheckBox5 = True
CheckBox6 = True
CheckBox7= True
Et si Checkbox1 = False
CheckBox5 = False
CheckBox6 = False
CheckBox7= False
Merci d'avance
2 réponses
-
Bonjour,
Un peu plus court ? :DPrivate Sub CheckBox1_Click() Rows(120).Hidden = Not CheckBox1.Value CheckBox5.Value = CheckBox1.Value CheckBox6.Value = CheckBox1.Value CheckBox7.Value = CheckBox1.Value End Sub Private Sub CheckBox2_Click() Rows(121).Hidden = Not CheckBox2.Value End Sub Private Sub CheckBox3_Click() Rows(122).Hidden = Not CheckBox3.Value End Sub Private Sub CheckBox4_Click() Rows(123).Hidden = Not CheckBox4.Value End Sub
A+ -
Je ne vois pas bien ce que je pourrais expliquer, cela me parais limpide.
A toutes fins..
J'ai enlevé tout ce qui était inutile.
Un CheckBox peu avoir la valeur True ou False
Pour cacher une ligne Hidden peu aussi avoir la valeur True ou False sauf que c'est l'inverse du checkbox, c'est ce que fait le <Not> il inverse la valeur du checkBox.
Ca va comme ça ? :-)
A+
Si tu te cognes à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)
NOTE : Je ne répond pas aux MP pour les questions techniques.
