Метод Find.ClearFormatting (Word)

Удаляет форматирование текста и абзаца из текста, указанного в операции поиска или замены.

Синтаксис

expression. ClearFormatting

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

Пример

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

Sub ClrFmtgFind() 
 With Selection.Find 
 .ClearFormatting 
 .Font.Bold = True 
 .Execute FindText:="Hello", Format:=True, Forward:=True 
 If .Found = True Then 
 .Parent.Expand Unit:=wdParagraph 
 .Parent.Copy 
 End If 
 End With 
End Sub

См. также

Поиск объекта

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

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