Propriedade TextRange.Story (Publisher)

Devolve um objeto História que representa as propriedades do bloco num intervalo de texto.

Sintaxe

expressão. História

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

Exemplo

Este exemplo devolve o bloco no intervalo de texto selecionado e, se estiver numa moldura de texto, insere 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.