Natalie,

Select the cells you want tmodify, then run this code:

Sub AddApostropheToRange()
Dim CellToModify As Object
For Each CellToModify In Selection
CellToModify.Formula = "'0" & CellToModify.Formula
Next CellToModify
End Sub

Hope this helps

Pete



"Natalie" wrote:

Does anyone know how to add characters to the beginning of numbers -

I have a list of numbers

51126
54889
53665

and I want

051126
054889
053665

I can't use the format cells, as I need the numbers to be text??

Thanks