Activex Checkboxen zu verbinden.
16.12.2022 10:17:23
Thorsten
Das Klappt auch, aber die Tatsache dass man gleichzeitig alle 3 Aktivieren kann und immer nur das letzte eingetragen wird, nervt echt.
Hier mal meine Anfänger Codes mit Bitte um Vereinfachung und Verbesserungen.
Private Sub CheckBox2_Click()
If CheckBox2.Value = True Then
Range("B15") = "nur login"
Else
Range("B15") = ""
End If
End Sub
Private Sub CheckBox3_Click()
If CheckBox3.Value = True Then
Range("B15") = "ja"
Else
Range("B15") = ""
End If
End Sub
Private Sub CheckBox4_Click()
If CheckBox4.Value = True Then
Range("B15") = "nein"
Else
Range("B15") = ""
End If
End Sub