Class StoryRanges (Word VBA)

A collection of Range objects that represent stories in a document. To use a StoryRanges class variable it first needs to be instantiated, for example

Dim srs as StoryRanges
Set srs = ActiveDocument.StoryRanges

Count

Returns a Long that represents the number of story ranges in the collection.

Dim lngCount As Long
lngCount = ActiveDocument.StoryRanges.Count

Item

Returns a single story of a range or selection as a Range object.

Item (Index)

Index: The specified story type.

Dim rngStoryRange As Range
Set rngStoryRange = ActiveDocument.StoryRanges(Index:=1)