I have the following code...
我有以下代码…
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
"page!R2C1:R1981C43", Version:=xlPivotTableVersion15).CreatePivotTable _
TableDestination:="", TableName:="PivotTable5", DefaultVersion _
:=xlPivotTableVersion15
Ac