Word VBA-删除特定段落内的形状

Question

我正在尝试删除以前搜索过的特定章节中的图片。 有人可以指出正确的方法吗...这是我到目前为止编写的代码。

    If insideparagraph Then

        'error is here
        Dim o As Word.InlineShape
        For Each o In DocPara.Range
        o.Delete
        Next

    End If

Answer 1

您可能需要进行调整和测试

If insideparagraph Then

    Dim o As Word.InlineShape
    For Each o In DocPara.Range.InlineShapes
    o.Delete
    Next

End If