在VSTO中删除MSWord页脚

时间:2016-06-20 17:08:27

标签: vba ms-word vsto

Word 2013 VSTO解决方案中的以下代码触发COMException(0x800A1710):无法编辑范围。

Section firstSection = document.Sections[1];
foreach(HeaderFooter footer in firstSection.Footers)
{
    if (footer.Exists)
    {
        footer.Range.Delete();
    }
}

编写为VBA宏的相同代码成功执行,没有任何错误。

Public Sub Test()

Dim section as Section
Set section = ActiveDocument.Sections(1)

Dim footer as HeaderFooter

For Each footer In section.Footers
    If footer.Exists Then
        footer.Range.Delete
    End If
Next

End Sub

我非常感谢有关为什么代码在VBA宏与VSTO解决方案中表现不同的任何建议

0 个答案:

没有答案