Just a note. Vba's Mid function works a little differently that the
worksheet version.

ActiveCell = Mid$(ActiveCell, 2)

--
Dana DeLouis
Win XP & Office 2003


"Andy" wrote in message
...
ActiveCell.Value = Right(ActiveCell.Value, Len(ActiveCell.Value) -1)

That did it.

Thanks everyone!

Andy