Главная » Статьи » Excel » Сводные таблицы

Автоматизация форматирования сводных таблиц

Есть такая проблема...

Сводные таблицы - самая великая вещь в Excel. Однако, если вы часто их строите, то не сможете не заметить, что у вас масса времени уходит на форматирование полей созданных таблиц. Сводные таблицы не наследуют формат данных от исходной таблицы и, если у вас в исходной таблице масса полей с числовыми данными, то вы довольно много времени посветите приданию этим полям удобоваримого вида (разделение разрядов, установка нужного количества символов после запятой, и т.п.).

Но есть и наработки...

Всеми любимый Николай Павлов откопал у некоего иноземца толковый макрос, который переносит на сводную таблицу форматирование, имеющееся в исходной таблице (на основе которой была построена сводная). Однако, данный макрос обладал досадным недостатком - он не работал с умными таблицами в качестве источника для построения сводных таблиц. Спешу исправить этот недостаток.

Код

Данная модификация одинаково хорошо работает как с диапазонными таблицами, так и с умными таблицами. Скопируйте код модуля в свои таблицы и запускайте процедуру AdoptSourceFormatting через Alt+F8 (табличный курсор должен стоять на одной из ячеек сводной таблицы). Обратите внимание на процедуру GetShortFieldCaption. Модифицируя её, можно управлять именем поля сводной таблицы, которое зависит от статистической функции, примененной к полю таблицы. Принцип прост, вы разберетесь. Если - нет, буду рад ответить на любые вопросы!

Скачать код


Читайте также:

Категория: Сводные таблицы | Добавил: dsb75 (20.09.2014) | Автор: Батьянов Денис E W
Просмотров: 3222 | Теги: форматирование сводных таблиц, сводные таблицы, Pivot table | Рейтинг: 5.0/1
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс.Метрика