ich fülle die Listbox2 mit u.a. Code:
Private Sub UserForm_Initialize()
With ListBox2
.ColumnCount = 8
.ColumnWidths = "1,8cm;1,1cm;4,3cm;5,7cm;2,1cm;2,1cm;2,1cm;2,3cm"
.TextColumn = 1
' .RowSource = "13!A2:H516"
.RowSource = "activesheet!A2:H516"
'.ColumnHeads = True
End With
End Sub
Der auskommentierte Wert funktioniert. Der Wert .Rowsource ="activesheet... klappt nicht. Gibt es eine Möglichkeit die Tabelle als variable zu setzten?
Besten Dank für eure Hilfe.
Gruss
Peter