Shape.OLEFormat 属性 (Publisher)

返回一个 OLEFormat 对象，该对象包含 OLE 格式指定形状的属性。 适用于代表 OLE 对象的 形状 或 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。