Nyydo:

When you record a macro of using the right arrow key two characters to the
right, what code do you get? That's the code you should put in the Do While
loop.

The code Graham showed you will process the entire document from start to
end, without the need of positioning the cursor at the start of the document.

You probably want to:

- find the text
- move the cursor
- stop the macro and do some manual work?
- repeat the whole deal, but starting from where you are

You do that by controlling the start point of the range object. Let me
modify the code Graham supplied to do that.

Sub Demo()

Dim oRg As Range

' Set range from start to end
Set oRg = ActiveDocument.Range

' Start range at current location
oRg.Start = Selection.Start

' Exclude field codes and hidden text
With oRg.TextRetrievalMode
   .IncludeFieldCodes = False
   .IncludeHiddenText = False
End With

' Find the next instance
With oRg.Find
   .Text = "stuff to find"
   .Wrap = wdFindStop
   .Execute
   If .Found = True Then
       ' Collapse the found object
       oRg.Collapse
       ' Select the found object
       oRg.Select
       ' Code developed by Nyydo
       ' to move the cursor
   Else
       MsgBox "The search item was not found."
   End If
End With
End Sub

Bear