Свойство Find.Font (Word)
Возвращает или задает объект Font , представляющий форматирование символов указанного объекта. Чтение и запись шрифта.
expression. Шрифта
Выражение Переменная, представляющая объект Find.
Чтобы задать это свойство, укажите выражение, возвращающее объект Font .
В этом примере выполняется поиск следующего диапазона текста, отформатированного шрифтом Times New Roman.
With Selection.Find
.ClearFormatting
.Font.Name = "Times New Roman"
.Execute FindText:="", ReplaceWith:="", Format:=True, _
Forward:=True
End With
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.