Make a backup of your data before trying this....

Put this in a standard module:

Sub ElimApost()
Dim c As Range, f As String
If Not TypeOf Selection Is Range Then Exit Sub
For Each c In Selection
If c.PrefixCharacter = "'" Then c.Formula = c.Value
Next c
End Sub

Then highlight your ss#'s A10:A500

Tools, Macro, select ElimApost, and Run






"jrh" wrote in message
...
I am trying to compare two lists by social security
number. However, one list has an apostrophe in front of
the ss# so the vlookup doesn't work. how do i get rid of
the apostrophe and make the format the same as the other
ss#?

thank you