Свойство Find.Wrap (Word)
Возвращает или задает то, что происходит, если поиск начинается в точке, отличной от начала документа и достигается конец документа (или наоборот, если для параметра Forward задано значение False), или если текст поиска не найден в указанном фрагменте или диапазоне. Чтение и запись WdFindWrap.
выражение. Wrap
выражение (обязательно). Переменная, представляющая объект Find.
В следующем примере выполняется поиск слова "аспирин" в документе. По достижении конца документа поиск продолжается в начале документа. Если слово "аспирин" найдено, оно выбирается.
Sub WordFind()
With Selection.Find
.Forward = True
.ClearFormatting
.MatchWholeWord = True
.MatchCase = False
.Wrap = wdFindContinue
.Execute FindText:="aspirin"
End With
End Sub
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.