Range.StoryType (Word)

Devuelve el tipo de artículo del intervalo, la selección o el marcador especificado. Aquí puede ver valores posibles para WdStoryType.

Dim wstStoryType As WdStoryType
wstStoryType = ActiveDocument.Range.StoryType