!!! Повторный поиск и замена в ворде

[alibek]

Ну так повтори указанный код четыре раза, в чем вопрос то?

[alibek]

Проверяешь, сколько было произведено замен. Если 0 - то цикл прекращается.

[alibek]

Код: Выделить всё

'типа того
Do
  With Selection.Find
    ...
    .Execute ...
    If Not .Found Then Exit Do
  End With
Loop


[san*]

Разберись с объектом Paragraph, может стоит искать по абзацам выделенного текста