Свойство FindReplace.MatchWidth (Publisher)

Статья
04/07/2023

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

Синтаксис

expression. MatchWidth

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

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

Boolean

Примечания

Это свойство может быть недоступно в зависимости от языка, включенного в вашей операционной системе. Значение по умолчанию — False.

Возвращает значение "Доступ запрещен", если язык Восточной Азии не включен.

Пример

В следующем примере обнаруживается каждое вхождение слова width в активном документе и применяется полужирное форматирование. Свойство MatchWidth имеет значение False , чтобы найти символы полной или половинной ширины. Например, этот поиск будет применять полужирное форматирование к слову "width" (символы половины ширины) и слову "w i d t h" (символы полной ширины).

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = False 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

В следующем примере обнаруживается каждое вхождение слова width в активном документе и применяется полужирное форматирование. Свойство MatchWidth имеет значение True , чтобы найти символы полной или половинной ширины. Например, в этом поиске к "width" будет применено полужирное форматирование. Форматирование не применяется к слову "w i d t h".

Dim objDocument As Document 
Set objDocument = ActiveDocument 
With objDocument.Find 
 .Clear 
 .FindText = "width" 
 .MatchWidth = True 
 Do While .Execute = True 
 .FoundTextRange.Font.Bold = msoTrue 
 Loop 
End With

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

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

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