expression.Copy
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
Use the Paste method to paste the contents of the Clipboard.
The Copy method can be used on Shape objects, but the Paste method cannot.
Example
This example copies shapes one and two on page one of the active publication to the Clipboard and then pastes the copies onto page two.
With ActiveDocument
.Pages(1).Shapes.Range(Array(1, 2)).Copy
.Pages(2).Shapes.Paste
End With
This example copies shape one on page one of the active publication to the Clipboard.
ActiveDocument.Pages(1).Shapes(1).Copy
This example copies the text in shape one on page one of the active publication to the Clipboard.
ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange.Copy