Listbox einträge sortieren - Typen unverträglich
12.12.2003 13:09:23
Eugen
ich möchte die Einträge in meiner Listbox sortieren, das versuche ich mit folgendem Code:
Dim iLast As Integer, iNext As Integer
Dim iTmp As Integer
With List2
For iLast = 0 To .ListCount - 1
For iNext = iLast + 1 To .ListCount - 1
If .List(iLast) > .List(iNext) Then
iTmp = .List(iLast)
.List(iLast) = .List(iNext)
.List(iNext) = iTmp
End If
Next iNext
Next iLast
End With
Hier ein Beispiel für einen ListBox-Eintrag
12.12.2003 | 606-888 | 3333.4444
in der dickmarkierten Zeile bringt er mir den Fehler "Typen unverträglich".
Die Sortierung funktioniert wunderbar, wenn ich reine Zahlen drinn stehen habe. Wo leigt mein Fehler?
Danke für jede Hilfe
Gruß Eugen