Ich habe auf einem UserForm eine CheckBox. Wenn mann ihn anklickt soll ja in A1 erscheinen wenn nicht dann leer lassen.
Private Sub CheckBox1_Change()
If CheckBox1 Then
Range("A1") = "Ja"
Else
Range("A1") = ""
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen