Superseded by AuthenticRange.Cut
The Cut method of AuthenticRange allows to delete any range of the document, not only the current UI selection.
// instead of:
// use now:
if (! Application.ActiveDocument.AuthenticView.Selection.Cut())
MsgBox ("Error: can't cut out current selection");
Cuts the current selection from the document and copies it to the clipboard.