返回一个包含指定形状的 OLE 格式属性的 OLEFormat 对象。应用于代表 OLE 对象的 Shape 或 ShapeRange 对象。只读。
本示例将活动演示文稿所有幻灯片中的形状循环一遍,并将所有已链接的 Microsoft Word 文档设置为手动修改格式。
For Each sld In ActivePresentation.Slides
For Each sh In sld.Shapes
If sh.Type = msoLinkedOLEObject Then
If sh.OLEFormat.ProgID = "Word.Document" Then
sh.LinkFormat.AutoUpdate = ppUpdateOptionManual
End If
End If
Next
Next