Propriedade TextRange.Length (PowerPoint)
Retorna o tamanho do intervalo de texto especificado, em caracteres. Somente leitura.
Sintaxe
expressão. Comprimento
Expressão Uma variável que representa um objeto TextRange .
Valor de retorno
Longo
Exemplo
Este exemplo define o tamanho da fonte do título como 48 pontos se o título do slide dois contém mais de cinco caracteres ou define o tamanho da fonte como 72 pontos se o título tem cinco ou menos caracteres.
Set myDocument = ActivePresentation.Slides(2)
With myDocument.Shapes(1).TextFrame.TextRange
If .Length > 5 Then
.Font.Size = 48
Else
.Font.Size = 72
End If
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.