Sorry about putting it in the wrong forum.
rFound is not changed with my code. Now that I think about it though, do you think that .Activate at the end is changing what rFound is supposed to be?
Consider the differences between:
Set rFound = Cells.Find(What:="(", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate
and
Set rFound = Cells.Find(What:="(", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False)
rFound.Activate
Bookmarks