Superseded by AuthenticRange.Copy
The Copy 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.Copy())
MsgBox ("Error: can't copy current selection");
Copies the current selection to the clipboard.