Sortiermakro sollte best. Zeichen überspringen
22.07.2018 12:48:14
Heinz
Habe ein Makro das mir die Werte in Spalte G nach Werten sortiert, funktioniert auch super.
Aber in Spalte G sind auch Zeichen"-" drinnen, diese werden als ersters angezeigt.
Die sollten aber an das Ende gestellt werden.
Kann mir dabei bitte jemand weiterhelfen?
Danke, Heinz
Sub filterKGRÖSSTE2()
Dim Sortierspalte As String
Dim Bereich As String
Bereich = "A1:O9000"
Sortierspalte = "G"
ActiveSheet.Range(Bereich).Sort _
Key1:=Range(Sortierspalte & "1"), Order1:=xlDescending, _
Header:=xlYes, MatchCase:=False, _
Orientation:=xlTopToBottom
End Sub
Anzeige