Selection.Cut (Word)

Supprime l'objet spécifié du document et le déplace vers le Presse-papiers.

Le contenu de la sélection est déplacé vers le presse-papiers, mais une sélection réduite est conservée dans le document.

If Selection.Type = wdSelectionNormal Then 
 Selection.Cut 
 Documents.Add.Content.Paste 
End If