CheckBox Schleife in UserForm

Hallo

Vielleicht weiss jemand gerade wie man in einem UserForm ein For Schleife mit CheckBoxen ansprechen kann. Der Code soll im UserForm bleiben, also nicht in ein Module oder ähnliches.

Bekomme folgende Fehlermeldung:
Compile Error: Sub or Function not defined.

also:

For i = 1 To 10
checkBox(i) = True
Next i

Danke
Flexo

Moin, Flexo,

da meint der Compiler, i wäre Argument der Function mit dem Namen Checkbox und

checkBox(i)

der Aufruf dazu.

Solltest Du aber ein Array namens Checkbox haben (was ich nicht annehme), dann spinnt der Compiler.

Gruß Ralf

ps: Option explicit in der ersten Zeile hilft manchmal gegen solche Irrtümer.

CheckBox in UserForm über Index ansprechen

Vielleicht weiss jemand gerade wie man in einem UserForm ein
For Schleife mit CheckBoxen ansprechen kann. Der Code soll im
UserForm bleiben, also nicht in ein Module oder ähnliches.

Hallo Flexo,

Private Sub CommandButton1\_Click()
Dim i
For i = 1 To 10
 Me.Controls("CheckBox" & i).Value = True
Next i
End Sub

Gruß
Reinhard

Hi Reinhard

Ahhaaaaa,

Habe immer mit

OLEObjects("CheckBox" & i).Object.Value = True

was machen wollen. Das funktioniert aber nur mit Sheets.

Danke Dir
Flexo