Publisher) (Shape.OLEFormat 屬性

會傳回 OLEFormat 物件包含 OLE 屬性所指定圖案的格式設定。 適用於代表 OLE 物件的 Shape 或 ShapeRange 物件。

語法

運算式。OLEFormat

expression 一個用於表示 Shape 物件的變數。

範例

在這個範例中，會循環查看使用中文件第一頁上的所有圖案，並自動更新所有連結的 Excel 工作表。

Sub UpdateLinkedExcelSpreadsheets() 
 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 shp 
End Sub

支援和意見反應

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