使用Excel VBA在书签之前插入分页符

如何在书签之前插入分页符到Word文档中？我试了下面的代码，但没有运气，如果有人有任何想法，我很乐意听到他们。使用Excel VBA在书签之前插入分页符

Set wRng = wdDoc.Bookmarks(FundCommentary).Range 
    wRng.HomeKey wdLine, wdMove 
    wRng.MoveUp wdLine, 1 
    wRng.InsertBreak wdPageBreak

Set wRng = wdDoc.Bookmarks(FundCommentary).Range 
wRng.Collapse wdCollapseStart 
wRng.InsertBreak wdPageBreak

2017-06-26 17:29:52

嘿蒂姆，谢谢大家的响应。当我将这段代码放入我的代码中时，它给了我一个错误，说文档没有打开？有什么建议么？ –

我在我的测试中使用了'ActiveDocument'，并没有更改为使用'wdDoc'匹配您的发布代码：现在修复了这个问题，所以看看它是否有效。你有没有添加Word作为参考，或者你是否使用了晚期绑定？多一点你的代码加上对“没有运气”的解释实际上看起来会很有用。 –

我用Set wRng = wdApp.ActiveDocument.Bookmarks（“FundCommentary”）。范围和它的工作，再次感谢你！ –

回答