PasteSpecial Method (Worksheet Object) Example
This example pastes a Microsoft Word document object from the Clipboard to cell D1 on Sheet1.
Worksheets("Sheet1").Range("D1").Select
ActiveSheet.PasteSpecial format:= _
"Microsoft Word 8.0 Document Object"
This example pastes the same Microsoft Word document object and displays it as an icon.
Worksheets("Sheet1").Range("F5").Select
ActiveSheet.PasteSpecial _
Format:="Microsoft Word 8.0 Document Object", _
DisplayAsIcon:=True