Сводная таблица на форме через ADO.Recordset

[refined]

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

Грубо говоря, есть так:

   pivotTotal = activeView.AddTotal('Количество', pivotField, ptConstants.plFunctionCount());  
    COM::createFromObject(activeView.DataAxis()).InsertTotal(pivotTotal);

А хочется чтобы происходило суммирование в случае если поле Amount. Но почему-то такой код не работает:

   pivotTotal = activeView.AddTotal('Сумма', pivotField, ptConstants.plFunctionSum());
    COM::createFromObject(activeView.DataAxis()).InsertTotal(pivotTotal);

Метод "AddTotal" в COM-объекте класса "PivotView" возвратил код ошибки 0x80045DE6 (<неизвестно>), который означает: Function cannot be applied to the given field.
PS я пробовал любые поля pivotFields.Item(i)...

[Gustav]

Я бы с такими вещами вначале разобрался в Бейсике (VBA) - в более родной для Pivot'а среде. Возьмите Excel, на один лист поместите ваши данные (recordset), на другой посадите PivotTable (внимание! не путать со сводной таблицей самого Excel!). Далее изобразите программу на VBA, которая бы делала то, что вы хотите. И только потом переносите в Аксапту.

Для удобства манипулирования свойствами PivotTable на VBA, воспользуйтесь подходом: Повышение комфортности разработки при использовании Spreadsheet

P.S. Если вы используете в качестве прототипа мой пример про пользователей и группы, то для суммы должно быть как-то так:

    rst = AdoRst::openRecordsetInMemory([   
             ...
            ['Amount', #adDouble]]);

    ...

    fld = flds.Item('Amount'); fld.Value(3.62);

    ...

    processFieldSet(activeView.DataAxis(), 'Amount');

    pivotTotal = activeView.AddTotal('Сумма', pivotField, ptConstants.plFunctionSum());  // использование именованной константы
    COM::createFromObject( activeView.DataAxis() ).InsertTotal(pivotTotal);

Поле-то надо добавить суммируемое в область данных (DataAxis). У меня же в примере с количеством используется просто последнее, оказавшееся в переменной pivotField. При подсчете количества этого достаточно, потому что считать можно практически по любому полю. Для суммы же нужно вполне конкретное числовое: в вашем случае - Amount.

[refined]

Спасибо огромное.
На самом деле я работал с VBA около месяца, но всё уже забыто. По началу мне действительно показалось, что сводные таблицы в Excele и на форме одинаковые. Но excel не сравнимо мощнее.

Цитата:

Сообщение от Gustav

Для удобства манипулирования свойствами PivotTable на VBA, воспользуйтесь подходом: Повышение комфортности разработки при использовании Spreadsheet

Это мне не удалось настроить так как у меня не активное VBA и макросы. Т.е. то ли их совсем нет, то ли их отключили на моем компьютере.

[Ivanhoe]

Сводные таблицы и Olap в Dax2009

Посмотрите мой проект. В примере идет группировка типа "Количество", но и с типом "Сумма" работает. Возможно, у вас изначально поле "Сумма" неверно добавлено в COM-объект.