Gruppe
Dialog
Problem
Wie kann ich beim Aktivieren einer CheckBox in die danebenliegende Zelle ein Häkchen eintragen bzw. löschen lassen?
ClassModule: Tabelle12
Private Sub CheckBox1_Click()
On Error Resume Next
With Range("A1")
If CheckBox1.Value = True Then
.Value = "ü"
Else
.Value = ""
End If
End With
On Error GoTo 0
End Sub