ich möchte 4 Comboboxen mit einem Single Array füllen aber leider klappt es nicht.
Mein Coding:
Private Sub
dim i as Byte
dim arrEh1 as Single
arrEh1 = Array("Std", "Stk", "1", "2", "3", "4", "5")
With UserForm1.ComboBoxEh1
For i = 0 To 6
.AddItem(i) = arrEh1
Next i
End With
End Sub
Was mache ich falsch?
Gruß
Lukas