Seite 1 von 1
Datenbereich sortieren (gelöst)
Verfasst: So, 26.09.2010 17:36
von clag
Hallo Kenner und Könner,
ein Frage und Bitte habe ich noch für Heute......
ich möchte einem benannten Bereich der aus 4 Spalten und 1000 Zeilen besteht
nach der zweiten 2. Zeile absteigend (Zahlen) und nach der 1.Zeile aufsteigend (Text) sortieren
was ich bis jetzt gefunden habe sieht für mich recht verwirrend aus
zB dieses
ist jemand so nett und kann mir das einmal für den obigen Fall konkret aufzeigen ? Bütte
Re: Datenbereich sortieren
Verfasst: So, 26.09.2010 18:00
von turtle47
Hallo,
hast Du Dich
dort auch schon einmal umgesehen?
Viel Erfolg.
Jürgen
Re: Datenbereich sortieren
Verfasst: So, 26.09.2010 18:11
von clag
Hallo Turtle47,
ja das ist immer meine erste Anlaufstelle
dann kommt die Forum Suche
und dann der neue Thread im Forum
die vielen Optionen und Parameter haben mich a bisserl erschreckt
wie du siehst, bin ich aber treu und geh auch nicht fremd (crossposting)
Re: Datenbereich sortieren
Verfasst: So, 26.09.2010 19:59
von clag
Hallo Leutz,
damit wolte ich den Bereich "z" sortieren nach spalte 2 absteigend
aber irgend wie passiert nichts auch keine Fehlermeldung der Code
füllt den Bereich "z" erfolgreich mit Daten nur wird nix sortiert
was mach ich da falsch
Code: Alles auswählen
Dim SortProps(2) As new com.sun.star.beans.PropertyValue
Dim SortFeld(1) As new com.sun.star.table.TableSortField
SortFeld(0).Field = 0
SortFeld(0).IsAscending = False
SortFeld(0).FieldType = com.sun.star.util.SortFieldType.AUTOMATIC 'Typ wird erkannt
' SortFeld(1).Field = 0
' SortFeld(1).IsAscending = True
SortFeld(1).FieldType = com.sun.star.util.SortFieldType.ALPHANUMERIC ' Sortierung von Text
SortFeld(1).FieldType = com.sun.star.util.SortFieldType.NUMERIC ' Sortierung von Zahlen
SortProps(0).Name = "SortFields"
SortProps(0).Value = SortFeld(1)
SortProps(1).Name = "SortColumns"
SortProps(1).Value = False
SortProps(2).Name = "ContainsHeader"
SortProps(2).Value = true
z.Sort(SortProps())
pleeease
Re: Datenbereich sortieren
Verfasst: So, 26.09.2010 20:20
von clag
Hallo Leutz,
bin selbst über den Fehler gestolpert
SortProps(0).Value = SortFeld(1)
ohne die 1 geht jetzt viiieeellll besser