|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
22.08.2012, 17:18 | #1 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
Макрос аля ВПР для формирования свода из закрытых книг
Добрый день, уважаемые эксперты!
Потеряв на поиск аналогичного решения уйму времени, вынужден просить Вашей помощи в написании макроса - аналога функции ВПР, только с расширенным функционалом (указание книги для поиска). Задача довольно банальна - создать свод, но данные должны вытягиваться из нескольких закрытых книг. Пусть у нас есть несколько книг в папке (только те что в папке анализируются макросом), путь к которой мы указываем в начале выполнения макроса. Запустив макрос в книге "Свод", он ищет данные в книге, наименование которой указано в столбце "A", и возвращает значение ячейки по указанному в столбце "B" Показателю и Столбцу, указанному в диапазоне C8:F8. Заранее премного благодарен даже за совет! |
22.08.2012, 17:23 | #2 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
И еще скажу что наименование листа во всех книгах одинаковое, в коде макроса можно указать как "Книга1".
|
22.08.2012, 18:39 | #3 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
Может быть я хочу многого... Эта задача вообще решаема?
|
22.08.2012, 18:43 | #4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
элементарная задача, просто, пока она ни кому не интересна, наберитесь терпения (мир не без добрых фей) и (или) продолжайте поиски.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
22.08.2012, 18:50 | #5 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
Понял. Это обнадеживает. Я верю в мир и в добрых людей).
|
22.08.2012, 20:37 | #6 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Было немного интересно
Не интересно прописывать код выбора папки - попробуйте сами, если нужно. Сейчас берётся папка из папки книги с макросом. Ну и лень было буквы D E H I кодом менять на цифры - просто замените их на листе на 3 4 7 8 Если это напрягает - нужно в код добавить список соответствий или код преобразования. Ну и почему "аля"? Вуаля Код:
Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 22.08.2012 в 21:37. |
23.08.2012, 09:33 | #7 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
Спасибо огромное!
|
23.08.2012, 11:22 | #8 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
Уважаемый Hugo121, подскаажите пожалуйста, как дописать код так, чтобы можно было еще выбирать имя лиса из диапазона (к примеру добавить столбец
B и вставить туда названия листов)? |
23.08.2012, 11:47 | #9 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Видите в коде cc.Value - это в формулу подставляется имя книги (по этому столбцу идёт перебор ячеек).
Если нужно добавить ещё и имя листа, то замените в строке ".xlsx]Лист1'!$B:$I," слово Лист1 например на " & cc.Offset(, 1).Value & " - это если имя листа будет левее имени книги. Ну и остальное чуть скорректировать вероятно придётся, если столбцы будут двигаться.
webmoney: E265281470651 Z422237915069 R418926282008
|
23.08.2012, 13:01 | #10 |
Форумчанин
Регистрация: 17.03.2009
Сообщений: 226
|
Еще раз спасибо! Все получилось.
|
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос для формирования таблицы | Wind-up Bird | Microsoft Office Excel | 0 | 12.11.2011 23:51 |
Получение данных из множества закрытых книг книг | hardkain | Microsoft Office Excel | 1 | 27.09.2011 20:18 |
Макрос для формирования прайса | Петро1 | Microsoft Office Excel | 3 | 01.08.2011 20:42 |
Макрос для формирования списка | OscarWilde | Microsoft Office Excel | 5 | 26.12.2010 15:27 |
копирование листов из закрытых книг | mephist | Microsoft Office Excel | 4 | 10.07.2009 17:18 |