Прочитать на английском

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


Свойство Font.Bold (Publisher)

Возвращает или задает констанду MsoTriState , представляющую состояние свойства Bold для символов в текстовом диапазоне. Для чтения и записи.

Синтаксис

expression. Смелые

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

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

MsoTriState

Замечания

Значение свойства Bold может быть одной из следующих констант MsoTriState , объявленных в библиотеке типов Microsoft Office.

Константа Описание
msoFalse Ни один из символов в диапазоне не отформатирован как полужирный.
msoTriStateMixed Возвращаемое значение, указывающее, что диапазон содержит текст, отформатированный полужирным шрифтом, а текст не полужирный.
msoTriStateToggle Заданное значение, переключающееся между msoTrue и msoFalse.
msoTrue Все символы в диапазоне отформатированы полужирным шрифтом.

Пример

В этом примере проверяется весь текст во втором материале активной публикации. Если он содержит как полужирный, так и не полужирный текст, он задает для всего текста полужирный шрифт. Если весь текст выделен полужирным шрифтом или не является полужирным, отображается сообщение, информирующее пользователя о том, что смешанный полужирный шрифт отсутствует. Для правильного выполнения этого кода в активной публикации должно быть две или более историй с текстом.

Sub BoldStory() 
 
 Dim stf As Publisher.Font 
 
 Set stf = Application.ActiveDocument.Stories(2).TextRange.Font 
 With stf 
 If .Bold = msoTriStateMixed Then 
 .Bold = msoTrue 
 Else 
 MsgBox "Mixed bolding is not in this story." 
 End If 
 End With 
 
End Sub

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

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