Beitrag von Chris
06.02.2023 17:22:30
Chris
ich fülle eine dreispaltige Listbox mit RowSource. Solange die Datenquelle das aktive Tabellenblatt ist, kein Problem.
Wie muss folgendes Makro lauten, wenn das Sheet "DQ" nicht die aktive Tabelle ist und die Daten in der Listbox erscheinen?
lngletzte = Sheets("DQ").Cells(Rows.Count, 30).End(xlUp).Row
With UserForm3
.ListBox1.ColumnCount = 3
.ListBox1.ColumnHeads = True
.ListBox1.RowSource = Sheets("DQ").Range("AD2:AF" & lngletzte).Address
.ListBox1.ColumnWidths = "30;650;30"
End With
Irgendwas mit der Forumstechnik ist mißglückt.Versuche es mal mit ---->.Adress(external:=True)
Gruß Gerd