VBA Word. Selection в защищенной части документа

2021-02-19T08:06:28Z

Уважаемые коллеги,
Как программно понять, что Selection находится в защищенной части документа.
Надо "подрихтовать" нежелательное форматирование для некоторых кусков текста.
Начало документа защищено от шаловливых ручек - заполняется программно.
"прочесать" надо весь документ, за исключением защищенных участков.
Делаю следующее

    Selection.Collapse

	ActiveDocument.UndoClear

    Selection.HomeKey Unit:=wdStory
    Selection.Find.ClearFormatting
    With Selection.Find
...
        .Text = "^p"
...
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    While Selection.Find.Execute = True
    On Error GoTo Conti
...
        Selection.Font.Bold = False
        Selection.Font.Size = 12
        Selection.MoveRight Unit:=wdCharacter, Count:=1  '', Extend:=wdExtend
Conti:
    Wend

Вставил On Error , он отрабатывает первый раз, а на следующем найденном фрагменте ломается (видимо, еще активен).
ВИжу два решения:
1. "понимать, что найденный Selection в защищенной "зоне"
2. Как-то подружиться с On Error
Оба варианта мне неведомы
Заранее благодарен.

Серый форум — VBA Word. Selection в защищенной части документа

VBA Word. Selection в защищенной части документа