Liebe Community,
ich habe ein Problem. Ich habe eine Tabellenzeile mit 5 Checkboxen und wenn eine geklickt wird, sollen die anderen 4 den Wert "False" bekommen. Ich finde meinen Fehler nicht. Mein Script:
Private Sub CheckBox11_Click()
If CheckBox11.Value = "False" Then
If CheckBox1.Value = "True" Then
CheckBox1.Value = False
End If
If CheckBox12.Value = "True" Then
CheckBox12.Value = False
End If
If CheckBox13.Value = "True" Then
CheckBox13.Value = False
End If
If CheckBox14.Value = "True" Then
CheckBox14.Value = False
End If
CheckBox11.Value = True
End If
End Sub
Pro Checkbox habe ich ein Private Sub. Es gibt insgesamt 12 Zeilen mit je 5 Checkboxen, ich übertrage das dann auf den Rest wenn es in einer Zeile funktioniert.
Mfg Moritz
|