трабла с PivotFieldSets...

[spiteful]

Совсем я запутался с этим PivotFieldSets... Подскажите, пожалуйста, как сбацать свой PivotFieldSet из строк или из чисел.

Код: Выделить всё

With frm.PivotTable.ActiveView
   Set fsname = .AddFieldSet("name")
   Set fspoint  = .AddFieldSet("point")


После этого как заполнить новые PivotFieldSet'ы значениями?!?