Поделиться через

Свойство TextRange.Length (Publisher)

  • Статья

Возвращает значение Long , указывающее длину указанного текстового диапазона в символах. Только для чтения.

Синтаксис

expression. Длина

Выражение Переменная, представляющая объект TextRange .

Пример

В этом примере размер шрифта текстового кадра на второй странице устанавливается в 48 пунктов, если текстовый фрейм содержит более пяти символов, или размер шрифта в 72 пунктах, если текстовый фрейм содержит пять или меньше символов.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.