Sortieren
26.07.2006 10:11:03
Big.bear
ich hoffe ihr könnt mir Helfen?
Ich wollte von einer Auswahl in ein Tabellenblatt springen und dieses soll dann nach der zweiten Spalte sortiert werden.
Ich hatte schon ein Markro gemacht leider geht es nicht?
Vielen Dank schon einmal
[Code]
ActiveSheet.Columns("A:B").Select
Selection.sort Key1:=Range("B2"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Anzeige