This example moves the selection one character to the left. If the move is successful, MoveLeft returns 1.
If Selection.MoveLeft = 1 Then MsgBox "Move was successful"
This example enables field shading for the selected field, inserts a DATE field, and then moves the selection left to select the field.
ActiveDocument.ActiveWindow.View.FieldShading = _
wdFieldShadingWhenSelected
With Selection
.Fields.Add Range:=Selection.Range, Type:=wdFieldDate
.MoveLeft Unit:=wdWord, Count:=1
End With
This example moves the selection to the previous table cell.
If Selection.Information(wdWithInTable) = True Then
Selection.MoveLeft Unit:=wdCell, Count:=1, Extend:=wdMove
End If