Guten Morgen liebes Forum,
ich suche momentan nach der Lösung für variable Checkbox-Namen.
Ich möchte den Wert aller Checkboxen in meinem Sheet (mehrere Tausend) in ein Array einlesen. Hierzu muss ich die einzelnen Checkboxen in einer Schleife ansprechen. Meine Idee sah folgendermaßen aus:
Dim cbCounter As String
Dim cbValue as Boolean
Dim i as Long
Do While (i < 20)
cbCounter = "CheckBox" & i
cbValue = ActiveSheet.cbCounter.Value
i = i + 1
Loop
(Der aktuelle cbValue wird dann in einer eigenen Schleife ins Array eingelesen, die ist hier aber nicht relevant).
An der markierten Stelle erhalte ich den Laufzeitfehler '438' : "Objekt unterstützt diese Eigenschaft oder Methode nicht."
Ich habe mehrere Möglichkeiten ausgeschlossen und verstehe das so, dass eine CheckBox nicht als Variable angesprochen werden kann. Ist jemanden hier das Problem bekannt, bzw. kennt jemand die Lösung?
|