Wenn der Zelleninhalt keine reine Zahl beinhaltet, dann ist der Inhalt Text - 12,0 w ist Text; und Text wird grundsätzlich anders sortiert als eine Zahl (deshalb ist da oft eine Sortierreihenfolge zu beobachten, welche man nicht erwartet).
Was du zuerst probieren solltest, wäre bei Range.Sort den DataOption1-Parameter auf xlSortTextAsNumbers zu setzen.
Wenn das nicht funktioniert, musst die die Zellen - anhand des Leerzeichens - in zwei Spalten teilen (siehe Excel-Funktion Daten - Text in Spalten). Nach der Teilung stehen dann links die Zahlen, rechts davon der Text-Anteil. So kannst du dann zuerst nach der linken Spalte und dann nach der rechten sortieren. (ggf. Makro Rekorder benutzen)
Grüße
PS: Für eine bessere Lesbarkeit solltest du die Code-Zeilen korrekt einrücken - derzeit ist das bei dir nicht der Fall / das reinste Chaos.
|