Listbox sortieren
11.12.2015 10:40:40
Lisa
In meiner Googlerecherche habe ich zu diesem Betreff sehr viel gefunden.
Für meine Bedürfnisse allerdings finde ich nicht das Richtige.
Meine Frage:
Ich habe eine mehrspaltige Listbox.
Private Sub UserForm_Activate()
Dim ZeileMAx As Long
Dim Vardat As Variant
ZeileMAx = Tabelle1.Cells(Tabelle1.Rows.Count, 1).End(xlUp).Row
Vardat = Tabelle1.Range("A1:M" & ZeileMAx).Value
With Me.ListBox1
.ColumnWidths = "25;25"
.ColumnCount = Tabelle1.Range("A1:M1").Columns.Count
.RowSource = Tabelle1.Range("A1:M" & ZeileMAx).Address
End With
End Sub
Hat jemand eine Idee um mich hier zu unterstützen?
Sollte eine Datei notwendig sein lade ich sie gern hoch.
LG Lisa