Converts the specified OLE object from one class to another, making it possible for you to edit the object in a different server application or change how the object is displayed in the document.
Dim objEmbedded As Object Documents.Add Set objEmbedded = ActiveDocument.Shapes _ .AddOLEObject(ClassType:= "Word.Document") objEmbedded.OLEFormat.Activate Selection.TypeText "Test" objEmbedded.OLEFormat.ConvertTo _ ClassType:="Word.Picture"
The following arguments are optional
ClassType - The name of the application used to activate the OLE object. You can see a list of the available applications in the Object type box on the Create New tab in the Object dialog box. You can find the ClassType string by inserting an object as an inline shape and then viewing the field codes. The class type of the object follows either the word "EMBED" or the word "LINK."
IconIndex - The index number of the icon within IconFileName. The order of icons in the specified file corresponds to the order in which the icons appear in the Change Icon dialog box (Insert Object dialog box) when the Display as icon check box is selected. The first icon in the file has the index number 0 (zero). If an icon with the given index number doesn't exist in IconFileName, the icon with the index number 1 (the second icon in the file) is used. The default value is 0 (zero)