Суммирование листов разных книг в одной

Дата: Вторник, 10.11.2020, 14:53 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

Доброго времени суток ГУРУ!
В очередной раз обращаюсь за помощью к Вам допилить (подпилить) код.
Есть сводная "Разработка формы_сводная. Данные в нее собираются из файлов, присланных из регионов (около 30 файлов). Столбец с перечнем имущества (Столбец В) во всех идентичный, НО, перечень имущества может быть добавлен (см. файл 1 - красным цветом).
Просьба-вопрос: как допилить код так, чтобы собирались данные и суммировались в "Разработка формы_сводная" (изначально диапазон D6:O72) с возможностью добавления новой (ых) позиций в столбце В?
Присылаемые файлы имеют разные названия. Структура в принципе одна и та же.

Заранее благодарен.

К сообщению приложен файл: __.xlsm (31.9 Kb) · 2374669.xlsx (17.0 Kb)

Начинающий. Много и долго не пинать. Больно однако.

Сообщение отредактировал bosika - Среда, 11.11.2020, 10:58

Дата: Среда, 11.11.2020, 14:58 | Сообщение № 2

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 102

Репутация: 26 ±

Замечаний: 0% ±

Excel 2010

Не уверен что ваш файл вообще что-либо суммировал. Попробуйте этот.

К сообщению приложен файл: rdytotry.xlsm (33.9 Kb)

Дата: Среда, 11.11.2020, 15:20 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

mgt, никак не хочет к сожалению. Сообщения выводит, а считывать - нет.

Начинающий. Много и долго не пинать. Больно однако.

Дата: Среда, 11.11.2020, 15:39 | Сообщение № 4

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 102

Репутация: 26 ±

Замечаний: 0% ±

Excel 2010

Странно, у меня работает. Приложите несколько файлов с данными, которые должен обрабатывать файл.

Сообщение отредактировал mgt - Среда, 11.11.2020, 15:42

Дата: Среда, 11.11.2020, 15:55 | Сообщение № 5

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

mgt, Там пока 2 файла.

К сообщению приложен файл: 9852561.rar (29.0 Kb)

Начинающий. Много и долго не пинать. Больно однако.

Дата: Среда, 11.11.2020, 15:59 | Сообщение № 6

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

mgt, Суммировать диапазоy D6:O72. Если будут добавляться данные из регионов, то диапазон будет меняться, если конечно нельзя сделать добавления позиции к существующим и резинового диапазона суммирования в главной Книге.

Начинающий. Много и долго не пинать. Больно однако.

Дата: Среда, 11.11.2020, 16:09 | Сообщение № 7

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 102

Репутация: 26 ±

Замечаний: 0% ±

Excel 2010

Из данного архива у меня не читается файл МоскУПХГ.xlsx. Второй читается и обрабатывается без проблем. Вниз добавлена новая строка с данными. Если будет несколько файлов, то будут обрабатываться все. Главное, чтобы лежали в одной дирректории со сводной таблицей. Каждая новая уникальная позиция будет добавлять новую строку в сводной таблице независимо от их количества.
https://youtu.be/TBqIKP7-yhs

Дата: Среда, 11.11.2020, 16:20 | Сообщение № 8

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 102

Репутация: 26 ±

Замечаний: 0% ±

Excel 2010

Вот еще пример с несколькими файлами, а также уникальными и неуникальными записями.
https://u.to/HfQxGg
И да, диапазон "резиновый"

Сообщение отредактировал mgt - Среда, 11.11.2020, 16:25

Дата: Среда, 11.11.2020, 16:29 | Сообщение № 9

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

mgt, Спасибо за ссылку. Будем посмотреть что применимо.

Начинающий. Много и долго не пинать. Больно однако.

Дата: Среда, 11.11.2020, 16:34 | Сообщение № 10

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

mgt, Впечатляет. И странно что второй файл не читается. А у меня Ваш код не хочет проходить. Может какая библиотека не подключена.

Начинающий. Много и долго не пинать. Больно однако.

Дата: Среда, 11.11.2020, 17:16 | Сообщение № 11

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 105

Репутация: 0 ±

Замечаний: 40% ±

Excel 2010, 2013, 2016

mgt, Большое Вам спасибо! Вообще круто, особенно с "резиновым" диапазоном. А то что не обрабатывал файлы, я нашел причину: в коде добавил расширение файлов ("*.xls", исправил на "*.xls*"). Еще раз огромное Вам СПАСИБО. Плюсую.

Тему можно закрыть.

Начинающий. Много и долго не пинать. Больно однако.

Сообщение отредактировал bosika - Четверг, 12.11.2020, 09:02