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

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

Синтаксис

expression. Длина

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

Возвращаемое значение

Длинное целое

Пример

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

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

См. также

Объект TextRange

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

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