Método TextRange.InsertBefore (PowerPoint)

Artigo
04/07/2023

Anexa uma sequência de caracteres ao início do intervalo de texto especificado. Retorna um objeto TextRange que representa o texto anexado. Quando usado sem um argumento, esse método retorna uma sequência de caracteres de tamanho zero no fim do intervalo especificado.

Sintaxe

expression. InsertBefore( _NewText_ )

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Newtext	Opcional	String	O texto a ser acrescentado. O valor padrão é uma sequência de caracteres vazia.

Exemplo

Este exemplo acrescenta a sequência de caracteres "Test version: " ao início do título do slide um da apresentação ativa.

With Application.ActivePresentation.Slides(1).Shapes(1)

    .TextFrame.TextRange.InsertBefore "Test version: "

End With

Este exemplo acrescenta o conteúdo da área de transferência ao início do título do slide um da apresentação ativa.

Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
    .TextRange.InsertBefore.Paste

Confira também

Objeto TextRange

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.