ich suche eine Möglichkeit, welche mir es ermöglicht eine Sortierung zu machen, welche folgendermassen funktionieren soll:
Ich möchte bei allen Spalten (Name, Status etc) so zwei kleine Buttons mit hoch/runter haben, dass sich die darunterliegenden Zeilen dann entsprechend der ausgewählten Spalte aufsteigend oder eben absteigend sortieren
Ich hoffe das ist einigermassen verständlich
Gibt es hier eine einfache schon in Excel implementierte Möglichkeit oder muss ich da was mit VBA basteln und wenn, hat einer sowas schon mal gemacht, von dem ich ein bischen Code haben könnte ?
mit vba würde das ca. so aussehen:
als Beispiel mit Spalte „A“
Sub aufsteigend\_sortieren()
'
'
Columns("A:A").Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlNo, \_
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
Sub aufsteigend\_sortieren\_mit\_Überschrift()
'
'
Columns("A:A").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes, \_
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
und das gleiche mit Spalte „B“ - absteigend:
Sub absteigend\_sortieren()
'
'
Columns("B:B").Select
Selection.Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlNo, \_
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
