|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
13.06.2012, 15:19 | #1 |
Пользователь
Регистрация: 17.07.2008
Сообщений: 81
|
Импорт данных с Excel в Word - очередное...
Здравствуйте, знаю что тема неоднократно поднималась и обсуждалась, но все просмотренные темы результата не дали (согласен, может плохо смотрел). В общем нужна помощь.
Задача: Во вложенном файле реализован договор купли продажи (пример). Мне необходимо импортировать данные в документ Word. Для этого я копирую определенный диапазон ячеек. Создаю объект Word (документ). Вставляю скопированный диапазон (таблицу) как Неформатированный текст (как в пункте MS Word - Правка/Специальная вставка). Копирую следующий необходимый диапазон ячеек и также вставляю. После таких манипуляций между текстами образуется множество знаков абзаца. Чтобы это дело подправить делаю поиск с заменой с помощью подстановочных знаков найти ^0013{2;} (два и более подряд идущих абзаца) заменить на ^0013 (один абзац). После того как текст отформатирован копирую и просто вставляю как таблицу уже другой диапазон (данные по товарам и реквизиты сторон). Чтобы найти куда вставлять данные таблицы заранее пишу в нужных местах документа ворд слова МЕТКА1 и МЕТКА2 (может это лишнее??) Но, все что я пишу "делаю" означает на самом деле "хочется" но не получается... Дополнительные данные написал в самом коде в комментариях. Спасибо, |
13.06.2012, 15:55 | #2 | |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
Цитата:
http://excelvba.ru/code/CreateWordDocuments#attachments
Единственный способ стать умнее, играть с более умным противником...
|
|
14.06.2012, 07:25 | #3 |
Пользователь
Регистрация: 17.07.2008
Сообщений: 81
|
Спасибо, прочитал/посмотрел/попробовал, не получается отработать код вставки неформатированного текста и поиска с заменой...
Хочется чтобы код работал (если это возможно) без подключения references объекта Word |
14.06.2012, 10:04 | #4 | |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
Цитата:
http://mirvba.ru/makrosi-excel/ekspo...schiu-vba.html
Единственный способ стать умнее, играть с более умным противником...
|
|
14.06.2012, 11:54 | #5 |
Пользователь
Регистрация: 17.07.2008
Сообщений: 81
|
Посмотрел, и на этом форуме смотрелhttp://www.sql.ru/forum/actualthread...507609#5093421 и http://www.cyberforum.ru/vba/thread284988.html посмотрел, но код вставки неформатированного текста не работает...
Ладно буду другие пути искать. |
14.06.2012, 12:18 | #6 |
Пользователь
Регистрация: 17.07.2008
Сообщений: 81
|
В общем код
Код:
Код:
|
14.06.2012, 14:57 | #7 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Код:
|
14.06.2012, 16:43 | #8 |
Пользователь
Регистрация: 17.07.2008
Сообщений: 81
|
EducatedFool, спасибо, отсюда http://www.programmersforum.ru/showthread.php?t=58507 узнал что числовое значение wdReplaceAll это 2, где можно узнать числовые значения остальных констант? Чет найти не можется...
|
14.06.2012, 16:54 | #9 |
Пользователь
Регистрация: 17.07.2008
Сообщений: 81
|
|
14.06.2012, 17:12 | #10 |
Форумчанин
Регистрация: 26.04.2010
Сообщений: 450
|
открываете word, нажимаете alt+f11, затем f2. Далее поиск )
Тишина – самый громкий звук
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Импорт данных из Word с постобработкой | strannick | Microsoft Office Excel | 4 | 30.04.2012 19:04 |
Импорт данных из Word в Excel макросом | vv66 | Microsoft Office Excel | 17 | 27.01.2012 14:49 |
SQL-запрос в excel, или импорт данных в word | Sanek_81 | Microsoft Office Excel | 7 | 10.02.2011 14:40 |
импорт таблиц word в excel | manowar_gub | Microsoft Office Excel | 6 | 13.12.2010 10:23 |