Método TextRange.Characters (PowerPoint)
Retorna um objeto TextRange que representa o subconjunto especificado de caracteres de texto. Para obter informações sobre como contar ou fazer loop pelos caracteres de um intervalo de texto, consulte o objeto TextRange.
Sintaxe
expressão. Characters( _Start_, _Length_ )
Expressão Uma variável que representa um objeto TextRange .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Start | Opcional | Long | O primeiro caractere no intervalo retornado. |
| Length | Opcional | Long | O número de caracteres a ser retornado. |
Valor de retorno
TextRange
Comentários
Se Start e Length forem omitidos, o intervalo retornado iniciará com o primeiro caractere e terminará com o último parágrafo no intervalo especificado.
Se Start for especificado, mas Length for omitido, o intervalo retornado conterá um caractere.
Se Length for especificado, mas Start for omitido, o intervalo retornado começará com o primeiro caractere no intervalo especificado.
Se Start for maior que o número de caracteres no texto especificado, o intervalo retornado começará com o último caractere no intervalo especificado.
Se Length for maior que o número de caracteres do caractere inicial especificado ao final do texto, o intervalo retornado conterá todos esses caracteres.
Exemplo
Este exemplo define o texto para a forma dois do slide um da apresentação ativa e, em seguida, torna o segundo caractere subscrito com um deslocamento de 20%.
Dim charRange As TextRange
With Application.ActivePresentation.Slides(1).Shapes(2)
Set charRange = .TextFrame.TextRange.InsertBefore("H2O")
charRange.Characters(2).Font.BaselineOffset = -0.2
End With
Este exemplo formata com negrito cada caractere subscrito na forma dois do slide um.
With Application.ActivePresentation.Slides(1).Shapes(2) _
.TextFrame.TextRange
For i = 1 To .Characters.Count
With .Characters(i).Font
If .Subscript Then .Bold = True
End With
Next
End With
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.