Selection.NextField (Word)

Selects the next field.

If this method finds a field, it returns a Field object; if not, it returns Nothing.

If Not (Selection.NextField Is Nothing) Then 
 Selection.Fields.Update 
End If