Does anyone have some VBA code that will convert all numeric values to text value in a certain column, in a certain worksheet?

Eg convert 630 to '630

The number of rows in my sheet can vary (I want to use this code on different workbooks also), so Code should loop through until last row of Data

Obviously existing Text values in the column should be ignored

Thanks