Clase StoryRanges (Word VBA)
Una colección de objetos Range que representan los artículos de un documento. Para usar una variable de clase StoryRanges, primero debe ser instanciado, por ejemplo
Dim srs as StoryRanges
Set srs = ActiveDocument.StoryRanges
Count
Devuelve un Long que representa el número de intervalos de artículos de la colección.
Dim lngCount As Long
lngCount = ActiveDocument.StoryRanges.Count
Item
Devuelve un solo artículo de un intervalo o selección como objeto Range .
Item (Index)
Index: Tipo de artículo especificado.
Dim rngStoryRange As Range
Set rngStoryRange = ActiveDocument.StoryRanges(Index:=1)