VB question on error

[Mikeeverest]

I'm running a sizable Macro and don't want to attempt to re-write the whole thing. It worked last month when I ran it but this month it didn't. It ran to almost the end so I dealt with it, I don't believe anything changed from last month to this.
The error is

ActiveSheet.PivotTables("PivotTable13").AddDataField ActiveSheet.PivotTables( _"PivotTable13").PivotFields("Policy#"), "Count of Policy#", xlCount

Any thoughts??

 

[Greg Truby]

Um yeah,

• Use code tags
• Tell us the error description
• Does your worksheet have a pivot table named "PivotTable13"?

You can check the last with a quick little routine

sub foobyscooby()
for i = 1 to activesheet.pivottables.count
s = activesheet.pivottables(i).name & vbcr
next i
msgbox s,vbinformation,"pivot found..."
end sub