|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
28.10.2019, 22:53 | #1 |
Форумчанин
Регистрация: 19.11.2011
Сообщений: 128
|
Оптимизировать макрос в Excel по внесению изменений в файлы word
Написал макрос в файле Excel, суть которого в следующем:
Открываем файл Word c именем, указанным в столбце 1. Искомый текст, указанный в столбце 3, заменяем на текст, указанный в столбце 4 с сохранением стилей и форматирования. ( Закрываем файл с сохранением. Открываем второй файл и повторяем все операции. Нюанс в том, что файлов много (около 20) и в каждом файле необходимо произвести много замен (по 30 в каждом). Итого мой код работает путем полного перебора всех вариантов т.е. файл word откроется, изменится и закроется в сумме около 600 раз... Что бы один и тот же файл не открывать заново для каждого из изменений, строку Код:
По возможности, прошу помочь оптимизировать код, что бы при выполнении не требовалось около 600 раз открыть/закрыть word. Но нужно именно замена текста в файле, вставка текста по меткам не подойдет. Буду очень благодарен за помощь. Код:
Нет ничего невозможного, главное верить в это.
|
28.10.2019, 23:35 | #2 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Как вариант - передавать в Sub subroutine_letters как параметр массив (или два) с словами для замены. И после открытия документа в цикле по массивам делать поиск-замену.
webmoney: E265281470651 Z422237915069 R418926282008
|
28.10.2019, 23:43 | #3 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Это точно ересь.
Код:
Код:
Анализ,обработка данных Недорого
|
29.10.2019, 09:38 | #4 | |
Форумчанин
Регистрация: 19.11.2011
Сообщений: 128
|
Цитата:
Я именно этого и хотел добиться, но опыта у меня не хватило, что бы сделать это без ошибок. Внес изменения в свой исходный код, работает теперь как надо!
Нет ничего невозможного, главное верить в это.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос связи Excel с Word | eemil | Microsoft Office Excel | 16 | 22.01.2016 17:28 |
Как из Excel запустить макрос в Word | HenryO | Microsoft Office Excel | 9 | 11.04.2013 07:12 |
VBA макрос Excel to Word | groder911 | Помощь студентам | 0 | 01.08.2012 16:55 |
макрос для слияния из excel в word | coriace | Microsoft Office Excel | 3 | 20.04.2012 00:12 |
Оптимизировать файл (после вноса изменений грузится по 15-20 минут) | voron2323 | Microsoft Office Excel | 3 | 25.03.2012 22:29 |