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.