This example cuts the first field in the active document and pastes the field at the insertion point.
If ActiveDocument.Fields.Count >= 1 Then
ActiveDocument.Fields(1).Cut
Selection.Collapse Direction:=wdCollapseEnd
Selection.Paste
End If
This example cuts the first word in the first paragraph and pastes the word at the end of the paragraph.
With ActiveDocument.Paragraphs(1).Range
.Words(1).Cut
.Collapse Direction:=wdCollapseEnd
.Move Unit:=wdCharacter, Count:=-1
.Paste
End With
This example cuts the contents of the selection and pastes them into a new document.
If Selection.Type = wdSelectionNormal Then
Selection.Cut
Documents.Add.Content.Paste
End If