Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Bei Aktivierung einer UserForm-CheckBox Häkchen in Zelle eintragen

Gruppe

CheckBox

Problem

Wie kann ich bei Aktivierung einer UserForm-CheckBox ein Häkchen in eine bestimmte Zelle eintragen lassen?

Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.

ClassModule: frmHaekchen

Private Sub chbhaekchen_Click()
   With Range("A1")
      On Error Resume Next
      .Font.Name = "Wingdings"
      If chbHaekchen.Value = True Then
         .Value = "ü"
      Else
         .Value = ""
      End If
   End With
End Sub

Private Sub cmdWeiter_Click()
   Unload Me
End Sub

StandardModule: basMain

Sub CallForm()
   frmHaekchen.Show
End Sub