vba - 通过 VBA 更改数据透视源

Question

当我使用下面的代码更改 VBA 中的数据透视源范围时，我得到“无效的过程或调用”。这样做的正确语法是什么？提前致谢。

Dim DataArea As Variant
'...    
DataArea = "Raw_Data!R1C1:R" & Selection.Rows.Count & "C" & Selection.Columns.Count
Sheets("Pivot-view").Select
Range("A1").Select
ActiveSheet.PivotTables("PivotTable1").ChangePivotCache ActiveWorkbook. _
   PivotCaches.Create(SourceType:=xlDatabase, SourceData:=DataArea, _
   Version:=xlPivotTableVersion14)

Answer 1

如果DataArea是工作簿中有效的命名范围，则宏中对它的引用需要用引号引起来；因此，更新

SourceData:=DataArea,

成为

SourceData:="DataArea",