BreakLink 方法

       

断开源文件与指定 OLE 对象、图片或链接域之间的链接。

注意   使用此方法后,在源文件发生变化的情况下,链接结果不会自动更新。

expression.BreakLink

expression   必需。该表达式返回一个 LinkFormat 对象。

示例

本示例更新活动文档中所有的 OLE 对象,然后断开链接。

Dim shapeLoop As Shape

For Each shapeLoop In ActiveDocument.Shapes
    With shapeLoop
        If .Type = msoLinkedOLEObject Then
            .LinkFormat.Update
            .LinkFormat.BreakLink
        End If
    End With
Next shapeLoop