Hi Samantha,

You've got apples and oranges going here.

If you want to use a DO loop and control the loop with Selection.offset then
just use a simple If statement inside the loop.

If you want to use the FIND function, you must set up a range variable for
the FIND to work within, then test the result of the Find function.

I think you'll find the Do If method easier.

Hope that helps you.

Lee Hunter

"toesparkle" wrote:


Hi all!
I need to stop a Do Loop function, but can't figure out how. I am
finding the word "Open", replacing it with text from another cell, and
looping until all the "Open"s are gone.

This is probably an easy fix, but it's kicking my butt.
I'd appreciate any help you can give me.
Thanks!
Samantha

Do
Cells.find(What:="Open", After:=ActiveCell, LookIn:=xlFormulas,
LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,
MatchCase:= _
False, SearchFormat:=False).Activate
Selection.Offset(0, 1).Select
Application.CutCopyMode = False
Selection.Copy
Selection.Offset(0, -1).Select
ActiveSheet.Paste
On Error Resume Next
Loop Until ?


--
toesparkle
------------------------------------------------------------------------
toesparkle's Profile: http://www.excelforum.com/member.php...o&userid=22454
View this thread: http://www.excelforum.com/showthread...hreadid=376100