如何在 Word VBA 中选择两个“书签”之间的文本?

如何在 Word VBA 中选择两个“书签”之间的文本?

注意:最初我问的是,如何从某个点向下选择文本,但我有一个解决方案:

Dim f As Word.Field
For Each f In ActiveDocument.Fields
    If f.Type = wdFieldAddin And f.Data = "BeginBody" Then
        f.Select
        Selection.EndKey Unit:=wdStory, Extend:=wdExtend
    End If
Next

现在,我的问题是如何选择“BeginBody”和“EndBody”之间的文本?

谢谢

答案1

使用两个书签。将起始书签命名为“start”,将结束书签命名为“end”。
之后,以下代码将选择两者之间的完整文本。

Sub SelectTextBetweenBookmarks()

    Set rngStart = ActiveDocument.Bookmarks("Start").Range
    Set rngEnd = ActiveDocument.Bookmarks("End").Range

    Range(rngStart.Start, rngEnd.End).Select

End Sub

在此处输入图片描述

相关内容