SpecialMode Property Example

This example checks to see whether Word is in a special mode. If it is, ESC is activated before the current selection is cut and pasted.

If Application.SpecialMode = True Then SendKeys "ESC"
With Selection
    .Cut
    .EndKey Unit:=wdStory
    .Paste
End With