Selection.Cut (Word)
Removes the specified object from the document and moves it to the Clipboard.
The contents of the selection are moved to the Clipboard but a collapsed selection remains in the document.
If Selection.Type = wdSelectionNormal Then
Selection.Cut
Documents.Add.Content.Paste
End If