Range.Delete (Word)
Löscht die angegebene Anzahl von Zeichen oder Wörtern.
Diese Methode gibt einen Long -Wert zurück, der die Anzahl der gelöschten Elemente angibt, oder sie gibt 0 (null) zurück, wenn der Löschvorgang nicht erfolgreich war.
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
Die folgenden Argumente sind optional
Unit (WdUnits) - Die Einheit, die zum Löschen des reduzierten Bereichs verwendet werden soll.
Dies sind mögliche Werte für
Count (Long) - Die Anzahl der zu löschenden Einheiten.