Brauche Hilfe beim Makro umschreiben!
18.07.2007 22:03:00
Sung
Ich hab mir ein Makro geschrieben was mir eine Sortierung nach Kriterium a,b, und c nacheinander in einer Matrix vornimmt.
Das klappt manuell für eine Tabellenblatt auch ohne Probleme.
Da ich gerade dabei bin in VBA mich einzuarbeiten, hab ich noch keine Lösung auf mein Problem gefunden.
Und zwar möchte ich das Makro nun für eine bestimmte Anzahl (so 20-30) von Tabellenblätter gleichzeitig ausführen lassen. (entweder beim ersten Öffnen einmalig oder permanent, falls das keine Probleme bzw Speicher frisst)
Makro_16er Makro
' Makro am 17.7.2007 von Sung aufgezeichnet
Range("A3:L10").Select
Selection.Sort Key1:=Range("A3"), Order1:=xlAscending, Key2:=Range("B3") _
, Order2:=xlAscending, Key3:=Range("C3"), Order3:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
xlSortNormal
End Sub