获取整个word文档的范围，包括所有故事

Question

如何获取“整个”文档的范围，包括wdMainTextStory, wdFootNotesStory, wdEndNotesStory等所有故事。此外，我还需要获得wdFootNotesStory的范围。 我尝试过各种方式。

ActiveDocument.Range(0, 0).Select
Selection.WholeStory 

这只选择整个wdMainTextStory。如果有人可以，请帮助我完成这个。

Answer 1

我找到了一种获取FootNotes范围的方法。

dim objRange As Word.Range

For Each storyRange In ActiveDocument.StoryRanges
    If storyRange.StoryType = wdFootnotesStory Then
        objRange = storyRange
    End If
Next storyRange