Возможности форматирования данных в сводной таблице (Excel2003) не устраивают!
В связи с этим необходимо скопировать данные из сводной таблицы на другой лист в подготовленную-разукрашенную шаблон-таблицу.

Как культурно на VBA пробежаться по полям сводной таблицы с учетом ее структуры?

Например:
СтранаГородКол-во партКол-во стульевРоссия1225РоссияПитер710РоссияМосква 515Уругвай1430УругвайПитер813УругвайМосква617
Я могу отдельно пробежаться по значениям каждого из полей, вот так:
Но как видно PivotFields("Город") содержит только уникальные PivotItems (Конечно в свойстве DataRange будет указаные ссылка на диапазон из двух регионов "$A$2;$A$5"), и работать на таком уровне не удобно.
Тем более становится не понятно как разобраться в иерархие поле Страна-Город. Ведь одни значения поля Город принадлежат одной Стране, а другие - другой. И как это можно вычислить через PivotFields и PivotItems я так и не понял.

trofikSergeySV,
если есть подготовленная раскрашенная таблица - туда можно сразу же вписать формулы (=получить.данные.сводной.таблицы(...))
или нельзя?

Одними формулами будет тяжеловато.
Всегда можно конечно поперекидывать данные средствами VBA, но тогда придется много лишней работы за Excel делать. В сводной удобно что она сама группирует данные и фильтры применять по ней удобно. При таком развитом программном функционале мне казалось, что проблема работы с полями сводной таблицы не должна представлять серьезных трудностей.

Я пока вижу только один вариант - ориентироваться на номер строки из свойства DataRange и таким образом стыковать PivotItems из разных PivotFileds

Мдаа, свойство DataRange тоже не очень подходит, оказывается оно не всегда доступно, да строчки могут быть скрыты.

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

Изучаю щас этот вариант......
- чтобы функция работала необходимо раскрыть все строчки сводной таблицы;
- функции необходимо указать названия значений полей - содержимое исходной таблицы будет все время меняться, значит надо откуда-нибудь взять эти значения - получается видимо опять перебором в PivotFields

trofikэта...
если просто в разукрашенном шаблоне просто нажать = и выбрать нужную ячейку из сводной таблицы (формула напишется автоматически), после обновления сводной - в шаблоне данные тоже поменяются

Мдаа, вариант хороший, НО в моем случае после обновлении данных в сводной таблице формулы перестают работать. Потому что у меня например вместо России с Уругваем оказываются Китай с США. Приведенный в начале топика пример в этом смысле не очень удачный. В реале меняются не только сами итоговые данные, но и значения полей в "области строк"

Фу, ну кажись разобрался.

Оказывается если пробежаться по ячейкам сводной таблицы из "области данных" (.DataBodyRange), то через свойство PivotCell.RowItems я получаю список полей (PivotItem) из "области строк" к которым это значение относится.

Т.е. логика оказывается обратная: от данных(от кол-ва стульев/парт из примера) к заголовкам строк (к Странам и Городам из примера)