Excel und VBA: Formeln, Programmierung, Lösungen

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

    

Beiträge aus dem Excel-Forum zu den Themen Dialog und CheckBox