VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Werte in Zelle eintragen, wenn CheckBox aktiviert

Gruppe

Dialog

Bereich

CheckBox

Thema

Werte in Zelle eintragen, wenn CheckBox aktiviert

Problem

Wie kann ich in die Nebenzelle einer CheckBox Werte eintragen lassen, wenn die CheckBox aktiviert wird?

Lösung

Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.




ClassModule: Tabelle1

Private Sub CheckBox1_Click()
   ActiveCell.Select
   With Range("A2")
      If CheckBox1.Value = True Then
         .Value = 2.5
      Else
         .Value = ""
      End If
   End With
End Sub

    


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