返回一个 OLEFormat 对象,该对象代表指定图形、嵌入式图形或域的 OLE 特性(链接除外)。只读。
本示例遍历活动文档中所有浮动图形,并将所有链接的 Microsoft Excel 工作表设置为可自动更新。
For Each s In ActiveDocument.Shapes
If s.Type = msoLinkedOLEObject Then
If s.OLEFormat.ProgID = "Excel.Sheet" Then
s.LinkFormat.AutoUpdate = True
End If
End If
Next