Variablen Bereich in ComboBox laden
29.09.2016 15:10:38
Henner
ich möchte einen variablen Bereich in eine ComboBox laden. Der Bereich selber wird in einem Tabellenblatt festgelegt.
In der Tabelle "Settings" in Zelle D11 steht der Wert 2
In der Tabelle "Settings" in Zelle E11 steht der Wert 30
Beim Ausführen wird mir die Zeile "Dim arr(VarMin To VarMax)" markiert.
Fehler: Konstanter Ausdruck erforderlich
Dim VarMin As Integer
Dim VarMax As Integer
Dim arr(VarMin To VarMax)
Dim L As Long
VarMin = Sheets("Settings").Range("D11").Value * 1
VarMax = Sheets("Settings").Range("E11").Value * 1
For L = VarMin To VarMax
arr(L) = L
Next
ComboBox3.List = arr
Dim arr(2 To 30)
Dim L As Long
For L = 2 To 30
arr(L) = L
Next
ComboBox3.List = arr