Hallo zusammen,
ich bin dabei ein Listenfeld mit 3 Spalten zu füllen und sehe leider immer nur die erste Spalte in meiner UIR-ListBos1.
da mir die große Erfahrung fehlt, weiß ich aktuell nicht mehr weiter und freue mich auf ein Feedbaack aus dem Forum.
anbei mein code:
With Me.ListBox1
.ColumnCount = 3
.Clear
For i = 3 To Sheets("Ergebnis").Cells(Rows.Count, "A").End(xlUp).Row 'Alle Werte der Spalte A ab Zeile 2
.AddItem Sheets("Ergebnis").Range("A" & i).Value
.List(.ListCount - 1, 1) = Sheets("Ergebnis")(Range("B" & i).Value)
.List(.ListCount - 1, 2) = Sheets("Ergebnis")(Range("C" & i).Value)
End Select
Next
End With
vielen Dank für Eure Unterstützung.
Gruß Wolfgang