PivotSelect
Таблица!") . _
PivotSelect "Месяц [Все] ", xlLabelOnly With ActiveSheet .
PivotTables ( "СводнаяТаблица!").
PivotFields ("Месяц") .Orientation = xlRowField .Position = 1
End With
Группировка полей
Поля сводной таблицы можно группировать. Например, объединим магазины Альфа и Бета в одну группу. Для этого надо выделить поля этих магазинов и выбрать команду Данные, Группа и структура, Группировать (Data, Group and Outline, Group) (Рисунок 6.11). Программно тот жерезультат получается при помощи следующих двух инструкций:
ActiveSheet . PivotTables ( "Сводная
