Microsoft Excel

Herbers Excel/VBA-Archiv

Sortierung nach Current.Region

Betrifft: Sortierung nach Current.Region von: Marco
Geschrieben am: 08.09.2004 12:07:56

Hallo,
nachdem ich einen Bereich über die CurrentRegion-Funktion ausgewählt habe, möchte ich diesen Bereich sortieren.
Wenn ich die Sortierung über den Makrorekorder aufrufe, dann werden natürlich
die aktuellen Zellen für Key 1 bis 3 verwendet.
Die Tabelle wird jedoch nach jedem Makrostart in unterschiedlichen Zeilen anfangen. Wie kann ich dieses Problem beheben?
Viele Grüße / Marco


ActiveCell.CurrentRegion.Select

Selection.Sort Key1:=Range("C39"), Order1:=xlDescending, Key2:=Range( _
"E39"), Order2:=xlDescending, Key3:=Range("D39"), Order3:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:= _
xlTopToBottom

  


Betrifft: AW: Sortierung nach Current.Region von: Nepumuk
Geschrieben am: 08.09.2004 12:22:50

Hallo Marco,
so sollte es funktionieren:


With ActiveCell.CurrentRegion
    .Sort Key1:=.Range("A1"), Order1:=xlDescending, Key2:=.Range("B1"), Order2:=xlDescending, Key3:=.Range("C1"), Order3:=xlDescending
End With


Gruß
Nepumuk


  


Betrifft: AW: Sortierung nach Current.Region von: Marco
Geschrieben am: 08.09.2004 12:27:50

Hi Nepumuk,
ja, funktioniert super, danke!
Gruß
Marco


 

Beiträge aus den Excel-Beispielen zum Thema "Sortierung nach Current.Region"