Propriedade Document.StoryRanges (Word)
Retorna uma coleção StoryRanges que representa todos os textos do documento especificado. Somente leitura.
Sintaxe
expression. StoryRanges
Expressão Uma variável que representa um objeto Document .
Comentários
Para obter informações sobre como retornar um único membro de uma coleção, consulte Retornando um objeto de uma coleção.
Exemplo
Este exemplo percorre a coleção StoryRanges para determinar se Wdprimaryfooterstorywdprimaryfooterstory é parte da coleção StoryRanges.
For Each aStory In ActiveDocument.StoryRanges
If aStory.StoryType = wdEvenPagesFooterStory Then
MsgBox "Document includes an even page footer"
End If
Next aStory
Este exemplo adiciona texto ao texto de cabeçalho principal e exibe o texto.
ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Range _
.Text = "Header text"
MsgBox ActiveDocument.StoryRanges(wdPrimaryHeaderStory).Text
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.