Selection.CopyAsPicture Method (Word)
Office 2013
The CopyAsPicture method works the same way as the Copy method.
This example copies the contents of the active document as a picture and pastes it as a picture at the end of the document.
Sub CopyPasteAsPicture() ActiveDocument.Content.Select With Selection .CopyAsPicture .Collapse Direction:=wdCollapseEnd .PasteSpecial DataType:=wdPasteMetafilePicture End With End Sub