Find Text

[nehpets12]

I have data in column "A" this has numbers and text in it I have sorted them and I need a macro to go to the first cell with text in it

Thanks in advance

 

[Juan Pablo González]

Macro for that ?

Control Up ?

Control Home ?

 

[nehpets12]

if I start in A1 I need a macro that will go down column A till it finds Text

I hope this is clearer

1
2
3
4
Monday
Tuesday
Wednesday
Thursday
Friday

 

[Juan Pablo González]

You mean select "Monday" in your example ?

This works for Column A

Sub SelectTextColumnA()
On Error Resume Next
Columns(1).SpecialCells(xlCellTypeConstants, xlTextValues).Range("A1").Select
End Sub

 

[nehpets12]

Thank You Very much For Your Time