Уважаемые коллеги, приветствую.
Элементарный макрос для замены в Word двух символов абзаца на один не находит второй символ абзаца, если он перед таблицей. Какой у него код? Или в чем может быть проблема?
Пример макроса:
Sub Repl()
Selection.Range.Find.Execute FindText:=vbCrLf & vbCrLf, ReplaceWith:=vbCrLf, Replace:=wdReplaceAll
End Sub
Пример текста в Word:
любой текст
<пустая строка>
любая таблица
Используемое вами выражение находит подряд два символа абзаца, но по неизвестным причинам не происходит замена. Вы можете это сделать в самом Ворде, без макроса: отобразите диалог "Найти и заменить", в поле "Найти" вставьте два знака абзаца, в поле "Заменить" вставьте один знак абзаца и щёлкните "Найти далее". Ворд найдёт эти два знака абзаца. Теперь щёлкните "Заменить" и замена не произойдёт.
Значит для вашего задания не подходит этот способ, а нужно что-то придумывать.
Здравствуйте. Тоже нужно решение этого вопроса. Найти (^p^p) и заменить (^p) не работает именно для абзацев, находящихся перед таблицей. Есть ли уже решение? Может есть макрос какой?
Написал вам письмо на почту с заголовком "Письмо с Форума по VBA, Excel и Word". Написал именно на почту, а не на форум.
Добрый день. Можете ли вы еще раз поделиться решением
Написал вам письмо на почту. Написал именно на почту, а не на форум.