Selection.GoToNext (Word)

Returns a Range object that refers to the start position of the next item or location specified by the What argument. If you apply this method to the Selection object, the method moves the selection to the specified item (except for the wdGoToGrammaticalError, wdGoToProofreadingError, and wdGoToSpellingError constants).

GoToNext (What)

What: The item where the specified range or selection is to be moved.

Dim rngGoToNext As Range
Set rngGoToNext = Selection.GoToNext(What:=wdGoToBookmark)