OLEFormat.ConvertTo method (Word)
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.
Syntax
expression.ConvertTo ( ClassType, DisplayAsIcon, IconFileName, IconIndex, IconLabel )
expression Required. A variable that represents an OLEFormat object.
Parameters
Name | Required/Optional | Data type | Description |
---|---|---|---|
ClassType | Optional | Variant | 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." |
DisplayAsIcon | Optional | Variant | True to display the OLE object as an icon. The default value is False. |
IconFileName | Optional | Variant | The file that contains the icon to be displayed. |
IconIndex | Optional | Variant | 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). |
IconLabel | Optional | Variant | A label (caption) to be displayed beneath the icon. |
Example
This example creates a new document, and then inserts an embedded Word document with some text. The embedded document is then converted to a Word Picture.
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"
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for