01 Range("A2:o65536").Select
02 Range("i2").Activate
03 Selection.Sort Key1:=Range("i2"), Order1:=xlDescending, Header:=xlGuess, _
04 OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Nun ist es aber so, dass er wie in Zeile 2 angegeben, die Zelle I2 markiert, ich möchte aber, dass die zelle markiert bleibt, die es vorher war. Wenn man Zeile 2 löscht, wird A2 markiert.
Danke Kenni