ich lasse mir in einen Userform eine Combobox mit unten aufgeführten Code befüllen,
Leider werden mir nur Daten von Zeile B4 - C23 angezeigt obwohl 4 bis 74 befüllt ist.
In Spalte B = Artikel
In Spalte C = Preis
Hat jemand eine Idee wie ich alle Zeilen anzeigen kann?
Vielen Dank Sebastian
Private Sub UserForm_Activate()
Dim arr As Variant
ComboBox1.Value = "Bitte Artikel auswählen"
arr = Worksheets("Katalog").Range("B4", "C" & Range("B63000").End(xlUp).row + 1)
ComboBox1.List = arr
ComboBox1.ColumnCount = 2
End Sub