Kann mir wer helfen, ich habe dieses Makro endlich mit dem Makrorecorder aufgenommen. Nur kann ich nicht definieren, wie, wenn die Sortierung abgeschlossen ist, der Curser in die letzte aktive Zeile in Spalte A springt. Bitte um Hilfe
chris58
Sub sortiern()
' sortiern Makro
' Makro am 03.08.2007 von admin aufgezeichnet
Range("B25").Select
Range("A3:M5000").Sort Key1:=Range("B3"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub