- Код: Выделить всё
With frm.PivotTable.ActiveView
Set fsname = .AddFieldSet("name")
Set fspoint = .AddFieldSet("point")
После этого как заполнить новые PivotFieldSet'ы значениями?!?
With frm.PivotTable.ActiveView
Set fsname = .AddFieldSet("name")
Set fspoint = .AddFieldSet("point")
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1