Propriedade TextRange.Length (Publisher)

Retorna um valor Long indicando a duração do intervalo de texto especificado, em caracteres. Somente leitura.

Sintaxe

expressão. Comprimento

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

Exemplo

Este exemplo define como 48 pontos o tamanho da fonte de um quadro de texto na página dois caso o quadro de texto contenha mais do que cinco caracteres ou define o tamanho da fonte como 72 pontos caso o quadro de texto tenha cinco ou menos caracteres.

With ActiveDocument.Pages(2).Shapes(1) _ 
 .TextFrame.TextRange 
 If .Length > 5 Then 
 .Font.Size = 48 
 Else 
 .Font.Size = 72 
 End If 
End With

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.