Pivot Table Macro to run in XL2000

[Jonathan May]

I have an Excel2003 macro that creates a pivot table; I now need to ge
it to run in Excel 2000. I don't have access to any Excel 2000 hel
and I'm stuck!

The relevent part of the Excel 2003 macro is as follows

ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"'Data'!R1C2:R" & lrow & "C26").CreatePivotTabl
TableDestination:= _
"'[Invoicing v0.01.xls]Data'!R1C30", TableName:="PivotTable3"
With ActiveSheet.PivotTables("PivotTable3").PivotFields("Orde
No.")
.Orientation = xlRowField
.Position = 1
End With
ActiveSheet.PivotTables("PivotTable3").AddDataFiel
ActiveSheet.PivotTables( _
"PivotTable3").PivotFields("Pick & Pack"), "Pick & Pack Total"
xlSum

etc...

On running this in Excel 2000 the code crashes with the last two line
highlighted...

...Any advice on what to change for to make it run would be very muc
appreciated!

Thanks in advance for any help
Jonatha

 

[Tom Ogilvy]

AddDataField doesn't appear to be a method available in xl2000.

 

[Jonathan May]

Thanks Tom - that certainly helps!
Jonatha