Question

我正在尝试使用VBA创建一个数据透视表，但我遇到了运行时错误＆＃39; 13＆＃39;类型不匹配

我已经针对这个问题尝试了几种不同的解决方案，但似乎没有任何效果。

我的数据是一个超过80,000行的名单。我希望能够将VBA代码应用于具有不同行数的不同名单。工作簿中可能已经有一个数据透视表，所以我想创建一个新的数据透视表缓存，以确保它不会干扰另一个数据透视表（如果存在）或者它不会从缓存中拉出来不存在。

打开工作簿后，我的代码如下：

 Sheets.Add
        ActiveSheet.Name = "Pivot Table"
        Sheets("Roster").Activate

    ActiveWorkbook.PivotCaches.Create _
    (SourceType:=xlDatabase, SourceData:=ActiveSheet.UsedRange,Version:=xlPivotTableVersion14) _
    .CreatePivotTable TableDestination:="Pivot Table!R3C1", DefaultVersion:= _
    xlPivotTableVersion14

感谢您的帮助

VBA数据透视表错误

0 个答案: