MoveRight Method
Moves the selection to the right and returns the number of units it's been moved.
expression.MoveRight(Unit, Count, Extend)
expression Required. An expression that returns a Selection object.
Unit Optional WdUnits. The unit by which the selection is to be moved.
Can be one of the following WdUnits constants.
wdCell
wdCharacter
wdWord
wdSentence
The default value is wdCharacter.
Count Optional Variant. The number of units the selection is to be moved. The default value is 1.
Extend Optional Variant. Can be either wdMove or wdExtend. If wdMove is used, the selection is collapsed to the end point and moved to the right. If wdExtend is used, the selection is extended to the right. The default value is wdMove.
Remarks
When the Unit is wdCell, the Extend argument will only be wdMove.
Example
This example moves the selection before the previous field and then selects the field.
With Selection
Set MyRange = .GoTo(wdGoToField, wdGoToPrevious)
.MoveRight Unit:=wdWord, Count:=1, Extend:=wdExtend
If Selection.Fields.Count = 1 Then Selection.Fields(1).Update
End With
This example moves the selection one character to the right. If the move is successful, MoveRight returns 1.
If Selection.MoveRight = 1 Then MsgBox "Move was successful"
This example moves the selection to the next table cell.
If Selection.Information(wdWithInTable) = True Then
Selection.MoveRight Unit:=wdCell, Count:=1, Extend:=wdMove
End If