Sortierung
26.01.2005 09:28:18
Katrin
ich habe mein Problem jetzt fast gelöst, bis auf: innerhalb einer Tabelle die schon vorsortiert ist, möchte ich einen Teilbereich nochmal sortieren lassen. Der Teilbereich befindet sich jedoch zu Beginn der Tabelle und mein Makro sortiert dann wieder alles fleissig mit. So sieht mein Makro aus:
'Teil 3: Sortieren nach Verbrauch
For i = 3 To lastrow
If UCase(Cells(i, 3)) = "N" And Cells(i, 1) kleiner 24000000000 Then
Exit For ' Finde erste Zeile mit KZ=N und Kundennummer kleiner 24000000000
End If
Next i
Range("A" & i & ":AA" & lastrow).Select
Selection.Sort Key1:=Range("E" & i), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Also das Problem liegt glaube ich in "lastrow"; es soll ja nur die Daten sortieren die kleiner 24000000000 sind.
Vielleicht kann mir jemand helfen.
Vielen Dank
Katrin