發行者) (OLEFormat.ProgId 屬性

會傳回代表指定之 OLE 物件的程式設計識別碼 (ProgID) 的 字串 。 唯讀。

語法

運算式。ProgId

表達 代表 OLEFormat 物件的 變數。

傳回值

字串

範例

本範例瀏覽使用中文件第一頁的所有連結的 OLE 物件圖案，及更新所有連結的 Excel 工作表。 本範例假設使用中出版物第一頁內至少有一個圖案。

Sub UpdateLinkedOLEObject() 
 Dim shp As Shape 
 For Each shp In ActiveDocument.Pages(1).Shapes 
 If shp.Type = msoLinkedOLEObject Then 
 If shp.OLEFormat.ProgId = "Excel.Sheet" Then 
 shp.LinkFormat.Update 
 End If 
 End If 
 Next 
End Sub

支援和意見反應

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