Maybe if you restated the question so that your objective is clear someone
would offer some advice.

"RITCHI" wrote:

The snippet of code below has worked well for ages but now I have some
cells with hundreds of characters in it,seems to fail. Any ideas/help
would be appreciated.
Thanks


Sub FindReplace()

Cells.Replace What:="$$", Replacement:=" ", LookAt:=xlPart,
SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False,
ReplaceFormat:=False

End Sub