Das Notes Forum

Lotus Notes / Domino Sonstiges => OLE/COM-Programmierung => Thema gestartet von: mannistderhartmann am 26.03.09 - 17:57:01

Titel: Excel Sortierpoblem bei exportierten Daten
Beitrag von: mannistderhartmann am 26.03.09 - 17:57:01

Hallo liebes Forum,

ich habe eine Datenbank entwickelt aus der ich Daten nach Excel exportiere.
Der Export funktioniert einwandfrei.
Nun möchte ich noch eine Sortierfunktion integrieren.
Dazu möchte ich die Funktion xlSort von Toni verwenden

http://atnotes.de/index.php/topic,39862.msg253630.html#msg253630

Function xlSort( xlSheet As Variant , sDataRange As String , sColumnRange As String ) As Variant
   ' # sDataRange => der gesamte Bereich mit Daten => "A2:F20" bei Kopfzeile, 5 Spalten und 19 Daten-Zeilen
   ' # sColumnRange => Die Spalte, nach der sortiert werden soll => "A2:A20" bei Kopfzeile und 19 Daten-Zeilen
   Call xlSheet.Range( sRange ).Sort( xlSheet.Range( sColumnRange ) , 1 )
End Function

Die Parameter sDataRange und sColumnRange werden folgendermaßen übergeben:

Wie kann ich einen dynamischen Zellbereich als String übergeben ?
z.B. so was vExcelSheet.Range(vExcelSheet.Cells(2,1), vExcelSheet.Cells(iRows-1,iColQuantity)).Select

Wenn ich das so mache, dann haben sDataRange und sColumnRange den Wert "True"
Vielen Dank für Eure Hilfe

Alex

Titel: Re: Excel Sortierpoblem bei exportierten Daten
Beitrag von: Axel am 27.03.09 - 09:17:18

Such hier mal nach xlSort. Da findest du einiges an Informationen.

Axel