Compartilhar via


Propriedade TextFrame.TextRange (Word)

Retorna um objeto Range que representa o texto no quadro de texto especificado.

Sintaxe

expressão. Textrange

Expressão Uma expressão que retorna um objeto TextFrame .

Exemplo

Este exemplo adiciona uma caixa de texto ao documento ativo e, em seguida, adiciona texto à caixa de texto.

Set myTBox = ActiveDocument.Shapes _ 
 .AddTextBox(Orientation:=msoTextOrientationHorizontal, _ 
 Left:=100, Top:=100, Width:=300, Height:=200) 
myTBox.TextFrame.TextRange = "Test Box"

Este exemplo adiciona texto a TextBox 1 no documento ativo.

ActiveDocument.Shapes("TextBox 1").TextFrame.TextRange _ 
 .InsertAfter("New Text")

Este exemplo retorna o texto de TextBox 1 do documento ativo e o exibe em uma caixa de mensagem.

MsgBox ActiveDocument.Shapes("TextBox 1").TextFrame.TextRange.Text

Confira também

Objeto TextFrame

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.