ich würde gerne mehrere Comboboxen einer Userform mit einer Schleife füllen. Die Comboboxen sollen alle mit unterschiedlichen Werten(jeweils 5), welche in einem Tabellenblatt untereinander stehen. Die Listen stehen untereinander beginnend bei der Zelle A4 bis A9 danach A11 bis A15 usw.
Ich habe es folgendermaßen probiert:
For i = 1 To 15
UserForm.Controls("ComboBox" & i).AddItem Sheets("Tabelle2").Range(Cells(1, j), Cells(1, j + 4))
j=j+7
Next i
Irgendwie will das bei mir nicht funktionieren. Ich bekomme diese Fehlermeldung "Laufzeitfehler 1004 Anwendungs oder objektdefinierter Fehler".
Alternativ würde ich alle Comboboxen mit RowSource füllen jeodoch wäre das sehr umständlich, da das Formular insgesamt 56 Comboboxen enthält.
Hoffe ihr könnt mir helfen! Danke im Voraus :)