sortierung

  • VB6
    hallo,
    ich habe probleme mit einem sortieralgorithmus.
    Ich arbeite mit einem excel sheet. In diesem excelsheet gibt es nun Zellen die in einer Spalte B absteigend(unsortiert) aufgereit sind.
    Bei diesen Zellen gibt es nun eine spezifikation. sie sind eingeteilt in 3 Gruppen A, B und C.
    Die Definition der einzelnen Zelle zu einer gruppe steht in der selben reihe allerings in Spalte A.
    Ein anderes VB Prog von mir soll jetzt auf diese Zellen zugreifen(was es genau macht ist jetzt nicht so wichtig da es ja eigentlich um die sortierung geht)
    Bisher geht das Programm die Zellen von oben nach unten durch. Die Sortierung sollte nun so funktionieren (ähnlich wie ein Filter), dass das Prog von oben nach unten zuerst alle von A durchgeht dann B und dann C
    ich habe das sheet so definiert unter einer public cons

    Quellcode

    1. Public Const sheet1 As String = "sheet1"


    so greif ich dann darauf zu:

    Quellcode

    1. Worksheets(sheet1).Cells(sheet1_row + test_nr, sheet_col) <> "")