Makro Sortieren nach bestimmter Zelle
06.11.2019 10:09:31
jinu
ich habe ein vermutlich relativ leichtes Problem. In meiner Tabelle (siehe Anhang am Ende) stehen Spalte A Namen und in Spalten B bis N die 12 Monate und am Ende die Summe. In Zelle A1 soll immer der Monat eingegeben werden nach dem die Tabelle darunter aufsteigend sortiert werden soll, also im Oktober soll A4:N12 nach K4 ("Oct") sortiert werden. Im nächsten Monat dann nach L5 z.B.
Zum Sortieren habe ich folgendes Makro
Sub sortieren()
Worksheets("Tabelle1").Range("A4:N12").Sort Key1:=Range("K4"), Order1:=xlDescending, _
Header:=xlGuess
End Sub
Wie müsste ich das Makro ändern damit es die Tabelle immer nach der "Eingabezelle" A1 sortiert? Wie müsste eine entsprechende Abfrage/Verknüpfung aussehen?
https://www.herber.de/bbs/user/132967.xlsx
Vielen Dank und viele Grüße
Jinu