Сбор данных в одну таблицу из разных таблиц

[ZakirovRR]

Добрый день.

Хочу объединить данные из нескольких таблиц в одну сводную, при этом не суммируя, а добавляя данные в сводную.

По возможности с кнопками заполнение и очисткой сводной.
данные заполнялись из таблиц лежащих в одной папке вместо со сводной.

Видел на данном форуме заполнение такой таблицы по вертикали, не могу переделать этот макрос чтоб заполнял по горизонтали.
Так же вложил сводную которую ранее использовал.

[Aleksandr H.]

1. открыл файл данных.
2. посмотрел что в D1
3. посмотрел в сводной, есть ли в 1 строке совпадения с п.2
4а. если п.3 - есть совпадения, скопировать-вставить с п1. в сводную начиная со столбца совпадения
4б. если п.3 - нет - завершить шаг

основной код в старой сводной есть, только сравнения надо реализировать


upd:
А что делать, например, с 4-й кукурузой Овощной сказки? в сводной, под кукурузу только 3 строки

[ZakirovRR]

да, не заметил отличие в сводной, поправил пустую сводную.

[Aleksandr H.]

На скорую руку, будет так

[ZakirovRR]

Большое спасибо. При первоначальном тестировании, все работает хорошо. Буду тестировать выгрузку всех таблиц.
заметил только, что если не хватает строки или лишний столбец, макрос не работает.
Сообщу менеджерам чтоб высылали таблицу в едином формате.

Еще раз большое спасибо!

[Темур]

Помогите, пожалуйста! Всё точно так же, но немного иначе
Мне нужно из таблицы "ТМЦ" перенести данные в "СВОДНУЮ ТМЦ".
1. Берём код из таблицы "СВОДНАЯ ТМЦ" столбец №4
2. Ищем этот код в Таблице "ТМЦ"
3. Вставляем данные из столбца №10 в таблице "ТМЦ" в столбец №7 в таблице "СВОДНАЯ ТМЦ" (напротив найденного кода в ней)
Если не найдено, то пусто, или "НЕТ".

[Aleksandr H.]

1 помещаем эти файлы в D:\ТМЦ
2 в ячейку G4 Файла "Сводная ТМЦ" пишем

=ЕСЛИОШИБКА(ВПР(D4;'D:\ТМЦ\[ТМЦ.xlsx]Лист1'!$I1:$AA$35000;16;0);"НЕТ")

[Темур]

Спасибо! Код работает, но не корректно! Во многих ячейках сделал "НЕТ", хотя путём поиска я убедился, что там есть данные.
В чём-то ошибка. Я не могу даже предположить что тут не так
И, ещё можно ли найденную ячейку полностью копировать вместе с форматом и данными. на скрине показано "Ч00070579" есть в "ТМЦ" а формула его сделала как "НЕТ" - Безымянный.jpg

[IgorGO]

Во многих ячейках сделал "НЕТ", хотя путём поиска я убедился, что там есть данные

а Вы еще путем проверки посмотрите что там за данные.
формулой не нашлось - значит нет такого!

[Темур]

Сообщение от IgorGO

а Вы еще путем проверки посмотрите что там за данные.
формулой не нашлось - значит нет такого!

там ячейка со значением "1" как на скрине
код - "Ч00070579" есть и там и там.