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

Objeto Document

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.