ich möchte 4 Spalten einer Listbox auf einem Tabellenblatt mit Werten
aus einer SQL Abfrage füllen.
In Userforms habe ich das immer mit folgendem Code hinbekommen.
'----------------------------------------------------------------------
Worksheets("XXX").LB1.ColumnCount = 4
Worksheets("XXX").LB1.ColumnWidths = ("2 cm;2,0 cm;3,5 cm;3,0 cm;")
Worksheets("XXX").LB1.List(i, 0) = .Fields!Wert1
Worksheets("XXX").LB1.List(i, 1) = .Fields!Wert2
Worksheets("XXX").LB1.List(i, 2) = .Fields!Wert3
Worksheets("XXX").LB1.List(i, 3) = .Fields!Wert4
'-----------------------------------------------------------------------
Bei der Listbox auf meinem Tabellenblatt funktioniert es nicht.
Kann mir bitte jemand helfen.
Vielen Dank.
Bst Grüße
Heiko