Word VBA: Если в файле есть искомый текст, то перейти в нужную часть кода

[djzhenia]

Есть файл (см. прикреплённый файл), как сделать следующее? Если в файле есть фраза "искомая фраза", то макрос должен удалить эту фразу и затем макрос должен перейти в нужную часть кода. Как это сделать?

Сделал сам (учитывая что я не знаю vba, это было тяжко):

Код:

    With ActiveDocument.Range.Find
        .Text = "искомая фраза"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        If .Execute Then
            GoTo i
        End If
    End With

[свернуть]

[вложение удалено администратором]