Макрос по консолидации двух таблиц в одну динамическую

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Макрос по консолидации двух таблиц в одну динамическую (Макросы/Sub)

yulyaat

Дата: Среда, 17.02.2016, 14:15 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

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

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

Excel 2010

Добрый день!

У меня есть задача. Руководство желает консолидировать 2 постоянно пополняющиеся таблицы в одну, которая так же будет изменяться дополняясь новыми данными. Не могу сообразить, как сделать что бы при добавлении новых данных в исходные таблицы, в итоговую добавлялись данные строчкой ниже. Создание обычной сводной таблицы не подходит.
[moder]

Цитата

У меня есть задача

А у нас нет Вашего примера.
Вложите файл согласно правил форума.[/moder]

Сообщение отредактировал yulyaat - Четверг, 18.02.2016, 08:53

Ответить

Wasilich

Дата: Среда, 17.02.2016, 19:59 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1232

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

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

2003

Цитата yulyaat, 17.02.2016 в 14:15, в сообщении № 1

что бы ... в итоговую добавлялись данные строчкой ниже.

Если интересует только это, то последнюю заполненную строку определяет код:
[vba]

Код

r = Range("A" & Rows.Count).End(xlUp).Row

[/vba](для столбца "А").

Сообщение отредактировал Wasilic - Среда, 17.02.2016, 20:01

Ответить

yulyaat

Дата: Четверг, 18.02.2016, 09:04 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

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

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

Excel 2010

Еще чтобы подтягивало автоматом в сводную определенные данные из 2-х таблиц. Пример прикрепила.

К сообщению приложен файл: 4486913.xlsx (11.6 Kb)

Ответить

KuklP

Дата: Четверг, 18.02.2016, 09:48 | Сообщение № 4

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

Ранг: Старожил

Сообщений: 2369

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

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

2003-2010

ИМХО надо делать консолидацию по нажатию кнопки. Потому как на каждый чих, будь то редактирование, случайное нажатие и т.д. нужно полностью обновлять ВСЕ данные. При больших объемах таблиц это будет тормоз. Сначала определитесь подходит ли Вам такое решение, а потом можно продолжить обсуждение.

Ну с НДС и мы чего-то стoим! kuklp60@gmail.com
WM Z206653985942, R334086032478, U238399322728

Ответить

Flatcher

Дата: Четверг, 18.02.2016, 11:10 | Сообщение № 5

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

Ранг: Участник

Сообщений: 94

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

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

Excel 2010

yulyaat, а почему Вы не хотите это решить формулами?

Ответить

Wasilich

Дата: Четверг, 18.02.2016, 11:50 | Сообщение № 6

Группа: Друзья

Ранг: Старожил

Сообщений: 1232

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

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

2003

Цитата Flatcher, 18.02.2016 в 11:10, в сообщении № 5

а почему Вы не хотите это решить формулами?

Ну, так предложите!

yulyaat, малость поизвращался, а вдруг пойдет. Красные ячейки в сводной, это последние строки исходных таблиц. Если мешают, их можно переопределить в другое место, где они не могут быть (случайно) удалены. Даже в сходные, если там не будут удаляться строки или столбцы.