Member Properties in PivotTable

R

Rolf Niklasson

Hi
I'm trying to display member properties in a pivottable using this code:

Dim ptVie
Dim fldStoreNam
Dim ptConstant

Set ptConstants = PivotTable1.Constant
Set ptView = PivotTable1.ActiveVie
Set fldStoreName = ptView.FieldSets("Factory").Fields("Factory"

fldStoreName.MemberProperties("Factory Name").DisplayIn = ptConstants.plDisplayPropertyInRepor

but I receive a script error saying 'Subscript out of range'
What's wrong
I've find the code example in the OWC reference and just adjusted it to my cube

Thanks
Rolf
 
Top