Clever-Excel-Forum

Hallo

Ich hab eine Userform mit einer Combobox. Diese soll mit .RowSource Daten aus dem gleihen Arbeitsblatt für die Box holen und bereitstellen. Nur funktioniert der Befehl nur, wenn die Daten in ein Spalte auf mehrern Zeilen zur Verfügung stellen (ComboBox1). Bei mir sind die Dsten jedoch auf einer Zeile bei aufeinanderfolgenen Spalten verteilt (Comboox2). Wie krieg ich nun hin, dass die Combobox2 die Daten aus den Spalten als Auswahlmöglichkeit bietet?

Danke im Voraus

Code:

Private Sub UserForm_Initialize()

Worksheets("Werte").Activate
UserForm1.ComboBox1.RowSource = "A2:A9"

Worksheets("Daten").Activate
UserForm1.ComboBox2.RowSource = "F2:O2"

End Sub

gelöscht, war etwas daneben.

Nicht gerade hilfreich...

Hallo,

versuche es mal so: ComboBox2.List = Application.Transpose(Range("F2:O2").Value)