|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
24.06.2011, 17:09 | #11 |
Форумчанин
Регистрация: 25.05.2011
Сообщений: 249
|
подскажите пожалуйста, как правильно, я о том и спрашиваю
и в каком коде оно прописано?? мне надо, чтобы макрос работал с разными книгами, соответственно, чтобы можно было задать, с какими именно из открытых ему работать. как еще можно занести Workbook в переменную?? |
24.06.2011, 18:03 | #12 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Непонятна задача в общем. Я именно с таким вопросом не сталкивался - обычно макрос работает с активной в определённый момент книгой, или с книгой с известным названием.
1 вариант Код:
Код:
Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 24.06.2011 в 18:06. |
24.06.2011, 19:33 | #13 | |
Форумчанин
Регистрация: 22.06.2011
Сообщений: 325
|
Цитата:
Dim Кеу_ As Workbook, Table_ As Workbook Иначе работать не будет А вообще было бы лучше если бы вы саму задачу озвучили где вы хотите применить чать этого кода....
Заказать макрос можно на сайте http://excel4you.ru/
|
|
25.06.2011, 00:59 | #14 |
Форумчанин
Регистрация: 25.05.2011
Сообщений: 249
|
ммм... спасибо за варианты
наверно у меня просто извращенная логика =ь задача такова (я ее уже озвучивала ранее): есть 2 книги (каждый раз это разные 2 книги, поэтому я хочу сделать их переменными). В одной лежит библиотека с ID-шниками. Другую книгу надо просмотреть на предмет слов из библиотеки и заменить их (слова) на ID хотелось сделать по-простому, да видать не получается Т_Т видимо придется как-то загонять эту библиотеку в массив (я не очень в этом понимаю, ну да когда-нибудь надо освоить)). видимо тут больше всего подходит 4-й вариант Hugo121 может я неправильно рассуждаю и вы мне что-нибудь посоветуете? вот пример: Table-Key.zip Последний раз редактировалось Bape}l{ka; 25.06.2011 в 01:01. |
25.06.2011, 01:14 | #15 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Ну если просто, и таблицы разные, то могу предложить вариант за деньги (но 15 раз бесплатно):
http://www.excelworld.ru/index/comparefiles_find/0-25 или http://hugo.nxt.ru/CompareFiles.Find.rar Настройки (пути поменяйте, или сотрите - тогда будет диалог выбора этих файлов) Файл - приёмник: c:\Temp\Таблица.xls Файл - источник: c:\Temp\Ключ (Библиотека).xls Столбцы сравнения в приёмнике: a Столбцы сравнения в источнике: b Лист - приёмник (№): 1 Лист - источник (№): 1 Столбцы - приёмники данных копирования: a Столбцы - источники данных копирования: a Для второго столбца: Столбцы сравнения в приёмнике: b Столбцы сравнения в источнике: b Лист - приёмник (№): 1 Лист - источник (№): 2 Столбцы - приёмники данных копирования: b Столбцы - источники данных копирования: b В принципе, код именно под эту задачу несложный, и примеры есть на форуме. Но если файлы будут меняться, то непросто организовать диалог ввода параметров. В моём варианте вписали это на лист, нажали кнопку.
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 25.06.2011 в 01:21. |
25.06.2011, 09:51 | #16 |
Форумчанин
Регистрация: 09.06.2011
Сообщений: 515
|
А почему не создать простую форму с полями путей файлов? А на задачу выборки можно по моему и ВПР() справится....
|
26.06.2011, 12:05 | #17 |
Форумчанин
Регистрация: 25.05.2011
Сообщений: 249
|
хочу разобраться, как это делать)
код под эту задачу уже есть, пока так обойдусь, буду думать про форму с полями) |
26.06.2011, 18:21 | #18 |
Пользователь
Регистрация: 09.12.2008
Сообщений: 56
|
Судя по описанию Вы уже "открыли" первую книгу с которой запускаете макрос. поэтому присвоить переменной эту книгу очень просто
'присваиваем переменной BazaWb ссылку на общий файл Set BazaWb = ActiveWorkbook 'присваиваем переменной BazaSht ссылку на активный лист в общем файле Set BazaSht = BazaWb.ActiveSheet Теперь Вам нужно открыть другой файл. Вы можете сразу при открытии присвоить ее переменной точно также через ActiveWorkbook. Ведь после открытия эта книга становится активной, а можете зная этот факт сразу обрабатывать данные. Вариант кода с описанием в файле.
обычно я на http://planetaexcel.ru/forum.php
|
27.06.2011, 09:42 | #19 |
Форумчанин
Регистрация: 25.05.2011
Сообщений: 249
|
Igor67, просто низкий поклон вам за труды О_о, я и не надеялась на такое =ь
особенно радуют подробные объяснения)) будем разбираться |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос на разноску данных по книгам | 804040 | Microsoft Office Excel | 18 | 01.03.2011 20:21 |
подключение одной DBGrid к разным DataSource | Rin | БД в Delphi | 3 | 12.01.2011 12:15 |
как привязать одну кнопку к разным книгам | akd2009 | Microsoft Office Excel | 2 | 02.02.2010 16:26 |
Возможно ли самому по книгам изучить С++ | покаЧайник | Свободное общение | 11 | 07.10.2009 18:42 |
Клетки в listView разным цветом | Altera | Компоненты Delphi | 9 | 24.09.2009 16:08 |