Método TextRange.InsertAfter (PowerPoint)
Acrescenta uma cadeia de caracteres até o final 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. InsertAfter( _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 inserido. O valor padrão é uma sequência de caracteres vazia. |
Exemplo
Este exemplo acrescenta a sequência de caracteres ": Test version" ao final do título do slide um da apresentação ativa.
With Application.ActivePresentation.Slides(1).Shapes(1)
.TextFrame.TextRange.InsertAfter ": Test version"
End With
Este exemplo acrescenta o conteúdo da área de transferência ao final do título do slide um.
Application.ActivePresentation.Slides(1).Shapes(1).TextFrame _
.TextRange.InsertAfter.Paste
Confira também
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.