Zur Zeit sortiere ich meine Daten per Befehlsbutton, würde aber gern die Daten sortieren wenn ich das Tabellenblatt öffne bzw. von einem anderen auf dieses wechsel.
Ich habe es als Sub Worksheet_open () versucht aber das funktioniert leider nicht.
ActiveSheet.Unprotect
Range("A3:I65000").Select
Selection.Sort Key1:=Range("A4"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNormal
Kann mir hier jemand einen Rat geben, wie ich das umstze?
liebe Grüße Lisa