Сводная таблица

Shuhrat

Гость

29.05.2008 14:54:30

Прощу помочь организовать правильную (удобную для меня) таблицу.
При составлении сводной таблицы я не могу поставить условия
последовательности (по полям BCOL) горизонтальной линии.
Покажу пример таблицы.

Прикрепленные файлы

post_18812.xls (46.5 КБ)

Лузер™

Гость

29.05.2008 15:17:09

В дополнительных параметрах поля BCOL у Вас в параметрах сортировки стоит "вручную (разрешается перетаскивание)". Вот и перетаскивайте как нравится.
Пример. Нужно перетащить "54К" в третий стобец. Тыкаем на "54К" подводим мышь к границе ячейки - к указателю добавляеется крестик со стрелочками, зажаимаем левую кнопку и тащим на место между столбцами "12U" и "33U"

Shuhrat Гость	#3 29.05.2008 15:49:34 Этот вариант я знаю Мне надо автоматическая решения условий так как очень часто использую этот функцию.

Лузер™ Гость	#4 29.05.2008 16:15:13 такой макрос: Sub Макрос1() k = 1 For Each rr In Range("E1:R1") ActiveSheet.PivotTables("СводнаяТаблица1").PivotFields("BCOL").PivotItems(rr.Value).Position = k k = k + 1 Next End Sub

Читают тему