通过

PowerPoint) (OLEFormat.Object 属性

  • 项目

返回一个对象，此对象代表指定 OLE 对象的最上层接口。 只读。

语法

表达式。对象

表达 一个代表 OLEFormat 对象的变量。

返回值

Object

备注

该属性使您可以访问某些应用程序中的属性和方法（OLE 对象在这些应用程序中创建）。

TypeName 函数用于确定对于特定的 OLE 对象的该属性返回的对象的类型。

示例

本示例显示当前演示文稿第一张幻灯片第一个形状中包含的对象的类型。 第一个形状必须包含 OLE 对象。

MsgBox TypeName(ActivePresentation.Slides(1) _
    .Shapes(1).OLEFormat.Object)

本示例显示一个应用程序的名称，活动演示文稿第一张幻灯片中每个嵌入的 OLE 对象都在该应用程序中创建。

For Each s In ActivePresentation.Slides(1).Shapes

    If s.Type = msoEmbeddedOLEObject Then

        MsgBox s.OLEFormat.Object.Application.Name

    End If

Next

本示例在 Microsoft Excel 工作簿第一张工作表的 A1 单元格中添加文本，该工作簿包含在当前演示文稿第一张幻灯片的第三个形状中。

With ActivePresentation.Slides(1).Shapes(3)

    .OLEFormat.Object.Worksheets(1).Range("A1").Value = "New text"

End With

另请参阅

OLEFormat 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。