Userform CheckBox.Value an Fkt übergeben
24.11.2016 10:40:18
Pasqual
ich würde gerne den Wert den ich in einer Checkbox mit Checkbox.Value erhalte an eine Fkt übergeben. Jedoch weiß ich nicht wie CheckBox.value definieren muss damit das geht.
Meine jetztige Lösung sieht so aus, dass ich eine Boolean Variable "Checker" habe die den Wert von CheckBox.Value zugewiesen bekommt.
Private Sub CheckBox1_Click()
Checker = CheckBox1.Value
Call ChecktheCheckBox(Checker)
End Sub
Public Function ChecktheCheckBox(A As Boolean)
If Checker = True Then
MsgBox ("Läuft")
End If
End Function
Die MsgBox war erstmal nur als Test um zu schauen ob es Funktioniert.
Gibt es eine Lösung bei der ich mir die Zeile: Checker = CheckBox1.Value sparen kann? Ich möchte die Fkt gerne bei mehreren CheckBoxen verwenden und da auch gleichzeitig wissen welche alle ein True als Wert haben.
Vielen Dank für eure Hilfe!
Beste Grüße
Pasqual
Anzeige