nach 2 Spalten sortieren per VBA
07.09.2013 22:05:56
Astis
ich will mein Tabellenblatt (B3 - D 1000)
nach Spalte A und Spalte B aufsteigend sortieren, bekomme es per VBA ab nicht hin...
hier mein Code... der ne Fehlermeldung bringt...
Sub NachMonatsortieren()
Range("B3:D1000").Select
Selection.Sort Key1:=Range("B3"), Order1:=xlDescending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Selection.Sort Key2:=Range("a3"), Order2:=xlDescending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
wo hab ich denn jetzt hier den Fehler ?
(hab jetzt einfach den ersten Teil quasi kopiert und aus Key1 und Order1 jeweils die Nummer 2 draus gemacht... fertig... oder denkfehler? Vielen Dank für die Hilfe vorab...