设置数据透视缓存时类型不匹配答案

【问题标题】：Type mismatch when setting up pivotcache设置数据透视缓存时类型不匹配
【发布时间】：2017-05-26 06:11:14
【问题描述】：

我有 pCach 作为 PivotCache

当我这样做的时候

ThisWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=pTRng).CreatePivotTable(TableDestination:= _
    wOPT.Cells(3, 1), TableName:="PivotTable2")

它按预期工作并在目标单元格上插入枢轴缓存

但是当我尝试这个时，它给了我类型不匹配的错误？

 Set pCach = ThisWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=pTRng).CreatePivotTable(TableDestination:= _
    wOPT.Cells(3, 1), TableName:="PivotTable2")

【问题讨论】：

你是怎么Dim pCach 的？
@iDevlop Dim pCach As PivotCache

标签： vba excel pivot-table

【解决方案1】：

尝试将 PivotCache 和 PivotTable 拆分为 2 个单独的代码行，如下面的代码所示：

Dim pTbl  As PivotTable
Dim pCach As PivotCache

' set the Pivot Cache
Set pCach = ThisWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=pTRng)

' create a new Pivot Table in "wOPT" sheet, start from Cell A3
Set pTbl = wOPT.PivotTables.Add(PivotCache:=pCach, TableDestination:=wOPT.Range("A3"), TableName:="PivotTable2")

【讨论】：

是的，我试过了，它说我必须再等 1 分钟才能将其标记为答案。
是的，如果我没记错的话，我们必须在答案发布后等待 5 分钟才能接受它作为解决方案。