Document.StoryRanges (Word)

Retorna uma coleção StoryRanges que representa todos os textos do documento especificado. Somente leitura.

Para obter informações sobre como retornar um único membro de uma coleção, consulte retornando um objeto de uma coleção.

For Each aStory In ActiveDocument.StoryRanges 
 If aStory.StoryType = wdEvenPagesFooterStory Then 
 MsgBox "Document includes an even page footer" 
 End If 
Next aStory