Range.Delete (Word)

Supprime le nombre de caractères ou de mots spécifié.

Cette méthode renvoie une valeur de type Long qui indique le nombre d'éléments supprimés ou un 0 (zéro) si la suppression a échoué.

Delete (Unit, Count)

Sub DeleteSelection() 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Are you sure you want to " & _ 
 "delete the contents of the document?", vbYesNo) 
 
 If intResponse = vbYes Then 
 ActiveDocument.Content.Select 
 Selection.Delete 
 End If 
End Sub

Arguments

Optional arguments

Les arguments suivants sont facultatifs

Unit (WdUnits) - L'unité à laquelle la plage réduite doit être supprimé.

Ici on trouve valeurs possible pour WdUnits

Count (Long) - Nombre d'unités à supprimer.