Userform ComboBox mehrere Spalten

Computer: Software & Programmierung Visual Basic
#1

Hallo,

ich habe unter Excel eine Userform mit einer ComboBox mit 2 Spalten. Gibt es eine Möglichkeit, nach Auswahl einer Zeile den Inhalt beider Spalten in der Combobox anzeigen zu lassen?
Mit BoundColumn kann ich ja immer nur eine Spalte anzeigen lassen.
Bei einer ComboBox in einem Excel Worksheet geht es ja mit:
Firma = ComboBox.List(ComboBox.ListIndex, 0)
Produkt = ComboBox.List(ComboBox.ListIndex, 1)
ComboBox.Text = Firma & " " & Produkt
aber das funktioniert bei der Userform nicht.
Hat vielleicht irgendjemand eine Idee?

Vielen Dank!
Mari

#2

Hallo Mari,

ich habe unter Excel eine Userform mit einer ComboBox mit 2
Spalten. Gibt es eine Möglichkeit, nach Auswahl einer Zeile
den Inhalt beider Spalten in der Combobox anzeigen zu lassen?

vielleicht. welche 2 Spalten sollen in welchen s Spalten angezeigt werden, geht es auch um Zellen?

Bei einer ComboBox in einem Excel Worksheet geht es ja mit:
…
aber das funktioniert bei der Userform nicht.

? Was funktioniert da nicht?

ComboBox.Text = Firma & " " & Produkt

Das ist einspaltig und nicht 2-Spaltig. Nur optisch 2-spaltig.

Option Explicit
'
Private Sub CommandButton1\_Click()
With ComboBox1
 .AddItem Cells(ActiveCell.Row, 4).Value
 .List(.ListCount - 1, 1) = Cells(ActiveCell.Row, 8).Value
End With
End Sub
'
Private Sub UserForm\_Initialize()
ComboBox1.ColumnCount = 2
ComboBox1.ColumnWidths = "2cm;2cm"
End Sub

Gruß
Reinhard