Pivot Table error

[sanjimmy]

I was wondering if any body can help me the below code:

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"Data!R" & rowDataHead & "C1:R" & rLast & "c" & cLast).CreatePivotTable TableDestination:=Sheets(TabPivotData).Range("A1"), _
TableName:="PivotData", DefaultVersion:=xlPivotTableVersion10

When I changed my data sheet from 37 Columns to 21 Columns and run the same pivot data, it highlighted the above code…I tried to put back my original data (37 columns’) and it works fine..

Thanks in advance.

Jimmy

[arthurbr]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here