excel vba - Error when accessing pivot table using VBA -


i have pivottable in excel looks this:

account                e-mail   sum of price    sum of billing price customer z             blah@gmail.com       30            33.75 customer z total                            30            33.75 customer y             blah@gmail.com       10            10.5 customer y total                            10            10.5 grand total                                 40              44.25 

i have following vba code:

for j = 2 pt.rowfields(1).pivotitems.count     sheets("configuration").range("j2").value = sheets("configuration").range("j2").value + 1      client = pt.rowfields("account").pivotitems(j)     sum = pt.getpivotdata("sum of billing price", "account", client)     net = pt.getpivotdata("sum of price", "account", client)     email = pt.rowfields("e-mail").pivotitems(j)     ... 

when run code, receive error: unable pivotitems property of pivotfield class when assigning value e-mail. assigning value client works expected. have tried using index numbers, same result.

it looks don't have emails in every row. may want put conditional statement in deal this.


Comments