Консолидация данных. Подписываем названия листов таблиц-источников
| Категория: Приемы и советы, Работа с табличными массивами | Опубликовано 24-10-2013
10
Необходимо консолидировать квартальные данные, чтобы получить годовой отчет:
Консолидируя данные из разных таблиц, расположенных в одной книге, но на разных листах, ответ получается не самым информативным, т.к. во втором столбце автоматически указывается имя файла-источника. Хотелось бы, чтобы во 2-м столбце были указаны названия листов:
Т.к. при создании консолидации со связью в ячейках присутствуют формулы, то возникает необходимость из самой формулы извлечь название листа:
Для определения адреса листа воспользуемся маленьким модулем, в котором представим формулу в виде текстовой строки (открыть редактор для вставки клавишами Alt+F11):
Public Function FormulaToText(rng As Range) As String
FormulaToText = IIf(rng.HasFormula, CStr(rng.Formula), “”)
End Function
Результат по функции будет:
Тип файла следует сохранить как книга Excel с поддержкой макроса.
Далее с помощью текстовых функций определим название листа (если в названии листа присутствуют пробелы, то оно заключается в апострофы):
09.05.2014 (04:48)
perfecto!
09.05.2014 (18:56)
странно, что нет стандартно в программе такой возможности.
спасибо за решение
09.05.2014 (20:25)
Thanks, because manually do it not so fast
26.05.2014 (09:56)
я подозревал, что решение должно быть!
01.06.2014 (05:24)
супер!
04.06.2014 (11:23)
Подскажите, сами консолидированные данные могут обновляться?
04.07.2017 (19:46)
смотрел ваше видео об этом, понравилось
22.08.2017 (22:07)
Спасибо за теплые слова
27.08.2017 (08:53)
Хорошая статья и ролик интересный/полезный. Подобное нигде не встречал.
25.11.2017 (00:40)
О, интересный вариант!