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

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

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

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

Код

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

Скачать код

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

• Введение в сводные таблицы

• Сводная таблица на основе двух и более связанных таблиц