Sortierung
29.04.2005 15:03:16
René
kennt jemand von Euch eine Methode, wie ich beliebig viele
Spalten sortieren kann mit VBA.
Unter Daten - sortiere habe ich ja nur die Möglichkeit drei
Spalten zu sortieren.
Wenn ich diese Methode per VBA nur anstoße und etwa 10 Spalten entsprechend
übergebe (siehe Code), dann bekomme ich einen Fehler.
With Selection
.Sort _
Key1:=Range("D4"), Order1:=xlDescending, _
Key2:=Range("F4"), Order2:=xlAscending, _
Key3:=Range("I4"), Order3:=xlAscending, _
Key4:=Range("L4"), Order4:=xlAscending, _
Key5:=Range("O4"), Order5:=xlAscending, _
Key6:=Range("R4"), Order6:=xlAscending, _
Key7:=Range("U4"), Order7:=xlAscending, _
Key8:=Range("X4"), Order8:=xlAscending, _
Key9:=Range("AA4"), Order9:=xlAscending, _
Header:=xlNo, OrderCustom:=1, _
MatchCase:=False, Orientation:=xlTopToBottom
End With
wer weiß Rat?
Danke
René