habe hier eine Blatt ("Test") auf dem eine Tabelle ("a1:c3") immer sortiert (nach Spalte C) werden soll, wenn sich ein Wert in der Tabelle ändert. Kann mir da jemand helfen? Hatte es bisher so probiert, was aber nicht so klappte:
Private Sub Worksheet_change()
Worksheets("Tabelle2").Range("a1:c1").Sort Key1:=Range("c1"), Order1:=xlDescending, Header:= _
xlGuess _
, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
Gruß
Gordon