![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сводная таблица, замена колонки Общий итог на Отклонение [D7, XP]
Анна © (2008-09-23 12:06:00)Как сделать, чтобы в сводной таблице вместо суммы в колонке "Общий итог" автоматически формировалась разность?
Например такая сводная табл.
otchet
DD prihod rashod Общий итог
01.01.2008 0.344 0.155 0.499
02.02.2008 0.223 0.023 0.246
03.03.2008 0.323 0.323 0.646
04.04.2008 0.350 0.456 0.806
Общий итог 1.240 0.957 2.197
В параметрах поля "Общий итог" выбираю дополнительные вычисления "Отличие" получается макрос:
Range("D5:D8").Select
With ActiveSheet.PivotTables("СводнаяТаблица4").PivotFields( _
"Сумма по полю data")
.Calculation = xlDifferenceFrom
.BaseItem = "(далее)"
End With
End Sub
Но в зависимости от "назад" или "далее" разность появляется в колонке prihod или rashod (с противоположным знаками), остальные колонки становятся пустыми.
Как сделать так, чтобы сохранить первоначальный вид сводной таблицы и отклонение помещать в колонку Общий итог?
Анна (2008-09-23 12:39:00) [21]
> Правильный$Вася (23.09.08 12:35) [5]
Вы прямо как следователь! Не противоречие, т.к. нужно заменить только колонку Общий итог, а у меня не получается, вот и сделала макрос, чтобы его перевести потом на Дельфи. Всю сводную таблицу на Дельфи писала таким способом.
ПРавильный$Вася (2008-09-23 12:36:00) [22]
> привела макрос, чтобы было понятно
мне не понятно, только запутываешь
давай код на дельфи
Правильный$Вася (2008-09-23 12:35:00) [23]
> Да написана уже программа!
противоречие
> Потом переведу на Delphi
Анна (2008-09-23 12:27:00) [24]
> Правильный$Вася (23.09.08 12:22) [3]
Да написана уже программа! Строится сводная таблица из запроса, все работает. Но нужно разность прихода и расхода вместо Общего итога.
Правильный$Вася (2008-09-23 12:22:00) [25]
> Но в зависимости от "назад" или "далее" разность появляется
> в колонке prihod или rashod (с противоположным знаками),
> остальные колонки становятся пустыми.
программы еще нет, что ж тогда обсуждаем
сначала напиши, потом, возможно, и вопрос отпадет
Анна (2008-09-23 12:20:00) [26]
> васик тут причем?
Это я просто привела макрос, чтобы было понятно... Потом переведу на Delphi . Программа на Delphi
Правильный$Вася (2008-09-23 12:11:00) [27]васик тут причем?