Макрос для для замены слов в файле word из файла-словаря Excel

Ответить

Код подтверждения
Введите код в точности так, как вы его видите. Регистр символов не имеет значения.

BBCode ВКЛЮЧЁН
[img] ВКЛЮЧЁН
[url] ВКЛЮЧЁН
Смайлики ОТКЛЮЧЕНЫ

Обзор темы
   

Развернуть Обзор темы: Макрос для для замены слов в файле word из файла-словаря Excel

Re: Макрос для для замены слов в файле word из файла-словаря Excel

pashulka » 26 янв 2018, 15:48

Aslin писал(а):Здравствуйте, не могу не задать этот вопрос, уж очень мне стало интересно это дело, а как написать команду, чтобы макрос завершил поиск слов как дойдет до последнего слова в тексте? Необходимо ввести оператор if? Или как - то по - другому?

Макрос не перебирает слова в тексте.
Но формально, если оставить в словаре одну единственную замену, то поиск/замена будет произведена один раз во всём документе, т.е. от начала и до конца, правда это действие(перебор) осуществляет не макрос, а сам Word.

Re: Макрос для для замены слов в файле word из файла-словаря Excel

pashulka » 26 янв 2018, 15:41

Aslin писал(а):Каким образом я заставляю его менять обратно на исходное слово? Я не запускаю макрос повторно

Макрос осуществляет замену так - в активном документе - текст из ячейки A1 меняется на текст из ячейки B1, затем, тоже самое происходит с ячейками A2 и B2 и далее до последней заполненной. Поэтому, когда Вы задаёте взаимоисключающие замены не стоит удивляться тому, что вторая замена возвращает всё на круги своя.

P.S. Чтобы двойной замены не происходило, можно попробовать(сам не проверял, ибо Word не моё) заменять только те слова, которые не выделены цветом.

Re: Макрос для для замены слов в файле word из файла-словаря Excel

Aslin » 26 янв 2018, 08:34

Здравствуйте, не могу не задать этот вопрос, уж очень мне стало интересно это дело, а как написать команду, чтобы макрос завершил поиск слов как дойдет до последнего слова в тексте? Необходимо ввести оператор if? Или как - то по - другому?

Re: Макрос для для замены слов в файле word из файла-словаря Excel

Aslin » 26 янв 2018, 08:13

Спасибо за ответы, решила просто заменить на другие синонимы

Re: Макрос для для замены слов в файле word из файла-словаря Excel

Aslin » 26 янв 2018, 08:08

Каким образом я заставляю его менять обратно на исходное слово? Я не запускаю макрос повторно

Re: Макрос для для замены слов в файле word из файла-словаря Excel

pashulka » 25 янв 2018, 19:25

вместо слова предусмотренных написано , предусмотенных (A134)
слово иных (A60) меняется на прочих (B60) а затем Вы опять заставляете макрос менять всё обратно, т.е. прочих (A140) на иных (B140)

Re: Макрос для для замены слов в файле word из файла-словаря Excel

Aslin » 25 янв 2018, 17:04

не были заменены предусмотренных, иных

Re: Макрос для для замены слов в файле word из файла-словаря Excel

pashulka » 25 янв 2018, 16:39

Нет информации о том какие слова не были заменены.

Re: Макрос для для замены слов в файле word из файла-словаря Excel

Aslin » 25 янв 2018, 16:13

Проверила по пунктам, все у меня в порядке, без пробелов и т.д.
Кстати, сделал прокрутку при помощи отмены действия, оказывается, он некоторые слова два раза заменяет синонимами. Я думала, что он дойдет до конца текста и остановится

Вернуться к началу