sorteren via macro op negatief getal en gedeeltelijke waarde

[grema]

beste
-via onderstaande macro kan ik sorteren
op de volledige letters/cijfers combinatie ( van m'n kolom ) in plaats van
een gedeeltelijke ingave te kunnen opgeven zodanig dat men selectie groter wordt
en er dus alleen gezocht w op de beginnende combinantie

Sub SortopPlaats()
Dim selectie As String
selectie = InputBox("geef waarde rek nummer in ")
Selection.AutoFilter Field:=5, Criteria1:=selectie
End Sub

via een andere macro probeer ik te sorteren op negatieve getallen of getallen die starten met - ervoor.

dit lukt me niet

weet iemand waar het fout loopt ??

 

[cow18]

pas deze regel aan

Selection.AutoFilter Field:=5, Criteria1:=selectie & "*"

nu filtert (het is dus niet sorteren) alle records die beginnen met je selectie

 

[grema]

filteren op negatieve getallen ?

alvast dank voor het antwoord
(sorry dat ik niet eerder kon antwoorden)


filteren op negatieve getallen
blijkt met de vorige formule niet te lukken
welk symbool kan hiervoor worden gebruikt?

pas nu volgende toe

    Selection.AutoFilter Field:=4, Criteria1:="<0", Operator:=xlAnd

dit lijkt wel te lukken , maar dan krijg ik ze allemaal en geen gedeeltelijke selectie .