共用方式為

PowerPoint) (OLEFormat.Object 屬性

  • 發行項

會傳回物件，代表指定之 OLE 物件的頂層介面。 唯讀。

語法

運算式。物件

表達 代表 OLEFormat 物件的 變數。

傳回值

物件

註解

此屬性可以讓您存取用來建立 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 支援與意見反應。