2 Spalten in ComboBox einfügen und auswählen
scheichuwe
Ich stehe vor einem Problem, bei dem ich selbst nicht mehr weiterkomme. Im Archiv hab ich auch nichts passendes gefunden.
Ich erstelle gerade ein Userform als Eingabemaske für einen Schichtplan.
Probleme gibt's mit der ComboBox.
Ich möchte eine Tabelle mit 2 Spalten hinterlegen, das hab ich auf mehreren Wegen auch geschafft. Aktuell sieht das so aus:
Private Sub UserForm_Initialize()
Dim arr As Variant
arr = Range("B88", "C" & Range("B65536").End(xlUp).Row)
ComboBox1.List = arr
ComboBox1.ColumnCount = 2
End Sub
Wie bekomme ich auch den Wert der 2.Spalte in meinen Plan? Geht das überhaupt?
Die Daten werden übrigens über einen Commnadbutton mit:
Private Sub CommandButton1_Click()
z = 1
Cells(z + 7, 3) = Me.ComboBox1
End Sub
Schon mal vielen Dank für eure Hilfe.
Gruß
Uwe