VBA sort numbers before text

[Phil-e]

Need help with VBA to sort text first then numbers. I have looked but can't find any examples. Can anyone help?

Thanks

 

[jindon]

Show us some sample data.

 

[Phil-e]

This is what I have. Some cells in my range have text and some have zerros. I need the cells with text to be on top after the sort.

Worksheets("1800").Range("A7:O34").Sort _
Key1:=Worksheets("1800").Range("A7"), _
DataOption1:=(xlSortTextAsNumbers)

Hope this helps.
Phil

 

[jindon]

Add one column and test if col.A is text or number true/false,
then you can sort with that column 1st and then follow your step.