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#msg253630Function 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