Vba 更新数据透视表时获取运行时错误5_Vba_Pivot Table

Vba 更新数据透视表时获取运行时错误5

vba

Vba 更新数据透视表时获取运行时错误5,vba,pivot-table,Vba,Pivot Table,我正在尝试更新透视表。以下代码在我的计算机上运行，但在我同事的计算机上显示运行时错误5-无效的过程调用或参数。错误在.ChangePivotCache行中累积 Sheets("DB for ECO Qty").Activate LastRow = Cells(Rows.Count, 1).End(xlUp).Row Sheets("ECO Qty over time Graph").Activate DataArea = "DB for ECO Qty!R1C1:R" & LastRow

我正在尝试更新透视表。以下代码在我的计算机上运行，但在我同事的计算机上显示运行时错误5-无效的过程调用或参数。错误在

.ChangePivotCache

行中累积

Sheets("DB for ECO Qty").Activate
LastRow = Cells(Rows.Count, 1).End(xlUp).Row
Sheets("ECO Qty over time Graph").Activate
DataArea = "DB for ECO Qty!R1C1:R" & LastRow & "C19"
Range("B4").Select
Application.DisplayAlerts = False
ActiveSheet.PivotTables("PivotTable1").ChangePivotCache ActiveWorkbook. _
PivotCaches.create(SourceType:=xlDatabase, SourceData:=DataArea, _
Version:=xlPivotTableVersion14)

Application.DisplayAlerts = True

数据透视表对象实际上是在Excel2007中改进的，因为在此之前它的方法非常有限

很可能您的同事正在运行Excel 2003，从这一点来看，该版本中似乎不存在

。ChangePivotCache

方法。

您的同事正在运行哪个版本的Excel？