ОБСУЖДЕНИЕ

Макрос в Word

0 ответов 4,3 тыс.
AI-выжимка обсуждения скоро

Краткие тезисы обсуждения со ссылками на ключевые ответы появятся здесь.

Статус
Закрыто для дальнейших ответов.
Автор темы
Господа, наваял макрос, который делает выборку определенных слов.
Пример

~Вася~
текст текст текст
~Дима~
текст текст
~Оля~

Код макроса такой
Sub M1()
Selection.Find.ClearFormatting
With Selection.Find
.Text = "~(*)~" 'То что я ищу, условие
.Replacement.Text = "^&"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Font.Bold = wdToggle
End Sub

Все, но при запуске макроса он не отрабатывает. А при запуске CTRL+F + это выражение работает замечательно.
Помагите где капать....?
 
Статус
Закрыто для дальнейших ответов.