Office) (TextRange2.Application 屬性

在不使用物件限定詞的情況下使用時，此屬性會傳回代表 Microsoft Office 應用程式目前執行個體的 Application 物件。 與物件限定詞一起使用時，此屬性會傳回代表 TextRange2 物件建立者的 Application 物件。 與 OLE 自動化 物件搭配使用時，會傳回物件的應用程式。 唯讀。

語法

expression.Application

運算式 傳回 TextRange2 物件的運算式。

傳回值

物件

範例

這個範例會示範在使用中 Publisher 出版物第一頁上建立每一個連結 OLE 物件的應用程式名稱。

Dim shpOle As Shape 
 
For Each shpOle In ActiveDocument.Pages(1).Shapes 
 If shpOle.Type = pbLinkedOLEObject Then 
 MsgBox shpOle.OLEFormat.Application.Name 
 End If 
Next

另請參閱

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。

  • 上次更新時間：