ich habe eine tabelle bei welcher über eine userform neue datensätze eingetragen werden. ebenfalls ist es möglich über eine combobox in der userform einzelne zeilen aufzurufen. ich hätte nun gerne, dass anstelle eines wertes (name) noch zwei zusätzliche (pers. nr. und Vorname) in der combobox erscheinen
nun meine frage:
ist es möglich, den nachstehenden code so umzuschreiben, dass in der combobox1 3 spalten erscheinen?
Private Sub UserForm_Initialize()
Sheets("Personaldaten").Select
ComboBox1.Clear
Dim i%
i = 2
Do Until IsEmpty(Cells(i, 5))
ComboBox1.AddItem Cells(i, 5)
i = i + 1
Loop
End Sub
besten dank
andi