Свойство TextFrame.AutoFitText (Publisher)

Статья
04/07/2023

Задает или возвращает константу PbTextAutoFitType , которая представляет, как Издатель Майкрософт автоматически изменяет размер шрифта текста и размер объекта TextFrame для лучшего просмотра. Для чтения и записи.

Синтаксис

expression. Автоподбор текста

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

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

PbTextAutoFitType

Замечания

Значение свойства AutoFitText может быть одной из констант PbTextAutoFitType , объявленных в библиотеке типов издателя Майкрософт.

Пример

В следующем примере проверяется, содержится ли текст в текстовом фрейме, и если да, то свойство AutoFitText имеет оптимальное соответствие.

Sub TextFit() 
 
 Dim tfFrame As TextFrame 
 
 tfFrame = Application.ActiveDocument.MasterPages.Item(1).Shapes(1).TextFrame 
 With tfFrame 
 If .HasText = msoTrue Then .AutoFitText = pbTextAutoFitBestFit 
 End With 
 
End Sub

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

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

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