MAsquer des checkbox en fonction d'un autre checkbox

Bonjour à toutes et à tous.

J'ai un formulaire dans XLSM. J'ai des checkbox. Je veux conditionner la valeur et la visibilité de certaines checkbox en fonction d'autres checkbox.

Exemple: Si la checkbox 170 est coché, que les checkbox 59, 62, 65..... deviennent automatiquement à oui.

J'ai essayé avec ce code mais ca ne fonctionne pas.

Private Sub CheckBox170_Click()
'Mise à jour des checkbox automatique pour la section VEGETATION************

If CheckBox170.Value = True Then CheckBox59.Value = True
If CheckBox170.Value = True Then CheckBox62.Value = True
If CheckBox170.Value = True Then CheckBox65.Value = True
If CheckBox170.Value = True Then CheckBox68.Value = True
If CheckBox170.Value = True Then CheckBox71.Value = True
If CheckBox170.Value = True Then CheckBox74.Value = True
If CheckBox170.Value = True Then CheckBox77.Value = True
If CheckBox170.Value = True Then CheckBox80.Value = True

End Sub

Merci de votre support

Bonjour

Il n'y a pas de raison, sauf si...

Bonjour La_baie_1976, BrunoM45 , le forum,

un essai....

Private Sub CheckBox170_Click()
 Dim i%
  For i = 59 To 80 Step 3
   Me.Controls("CheckBox" & i).Value = IIf(Me.CheckBox170.Value = True, True, False)
  Next i
End Sub

ou

Private Sub CheckBox170_Click()
 Dim i%
  For i = 59 To 80 Step 3
   Select Case Me.CheckBox170.Value
    Case True
     Me.Controls("CheckBox" & i).Value = True
    Case Else
     Me.Controls("CheckBox" & i).Value = False
   End Select
  Next i
End Sub

Cordialement,

Bonjour Xorsankukai.

J'ai malheureusement un message d'erreur "Membre de méthode ou de données introuvable" Pour les deux options que tu m'as fournis... :(