I keep on forgetting that I can do a record and solve it that way.
Anyway, this is was I got.


Columns("P:P").Select
Selection.Replace What:="-", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

It work fine on Excel 2000


--
jcc31
------------------------------------------------------------------------
jcc31's Profile: http://www.excelforum.com/member.php...o&userid=24692
View this thread: http://www.excelforum.com/showthread...hreadid=491083