返回一个对象，该对象代表指定 OLE 对象的顶层界面。该属性使您可以访问某些应用程序中的属性和方法（OLE 对象在这些应用程序中创建）。只读。
语法
表达式.Object
表达式 一个代表 OLEFormat 对象的变量。
返回值
Object
说明
使用 TypeName 函数判断此属性为特定的 OLE 对象返回的对象的类型。
示例
本示例显示当前演示文稿第一张幻灯片第一个形状中包含的对象的类型。第一个形状必须包含 OLE 对象。
| 示例代码 |
MsgBox(TypeName(ActivePresentation.Slides.Item(1).Shapes.Item(1).OLEFormat.Object))
|
本示例显示一个应用程序的名称，活动演示文稿第一张幻灯片中每个嵌入的 OLE 对象都在该应用程序中创建。
| 示例代码 |
for(let i = 1; i <= ActivePresentation.Slides.Item(1).Shapes.Count; i++){
if(ActivePresentation.Slides.Item(1).Shapes.Item(i).Type == msoEmbeddedOLEObject){
MsgBox(ActivePresentation.Slides.Item(1).Shapes.Item(i).OLEFormat.Object.Application.Name)
}
}
|
本示例在 ET 工作簿第一张工作表的 A1 单元格中添加文本，该工作簿包含在当前演示文稿第一张幻灯片的第三个形状中。
| 示例代码 |
let sli = ActivePresentation.Slides.Item(1).Shapes.Item(3)
sli.OLEFormat.Object.Worksheets.Item(1).Range("A1").Value = "New text"
|