Object Property
Applies To
OLEFormat object.
Description
Returns the object that represents the specified OLE object's top-level interface. This property allows you to access the properties and methods of the application in which an OLE object was created. Read-only.
Remarks
Use the TypeName function to determine the type of object this property returns for a specific OLE object.
See Also
Shape object.
Example
This example displays the type of object contained in shape one on slide one in the active presentation. Shape one must contain an OLE object.
MsgBox TypeName(ActivePresentation.Slides(1).Shapes(1)_
.OLEFormat.Object)
This example displays the name of the application in which each embedded OLE object on slide one in the active presentation was created.
For Each s In ActivePresentation.Slides(1).Shapes
If s.Type = msoEmbeddedOLEObject Then
MsgBox s.OLEFormat.Object.Application.Name
End If
Next
This example adds text to cell A1 on worksheet one in the Microsoft Excel workbook contained in shape three on slide one in the active presentation.
With ActivePresentation.Slides(1).Shapes(3)
.OLEFormat.Object.Worksheets(1).Range("A1").Value = "New text"
End With