Compartilhar via


Propriedade TextRange.Story (Publisher)

Retorna um objeto Story que representa as propriedades da história em um intervalo de texto.

Sintaxe

expressão. História

Expressão Uma variável que representa um objeto TextRange .

Exemplo

Este exemplo retorna a história no intervalo de texto selecionado e, se estiver em um quadro de texto, insere o texto no intervalo de texto.

Sub AddTextToStory() 
 With Selection.TextRange.Story 
 If .HasTextFrame Then 
 .TextRange.InsertAfter NewText:=vbLf & "This is a test." 
 End If 
 End With 
End Sub

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.