时间戳

首页 > 解决方案 > VBA EXCEL 创建一个包含所有填充单元格的数据透视表

excel - VBA EXCEL 创建一个包含所有填充单元格的数据透视表

问题描述

我正在尝试在 FILTERED 工作表中从 ALL_RECORDS 工作表中的所有非空单元格创建一个数据透视表（填充的单元格每天都会不同），如下所示：

    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
        "ALL_RECORDS!R1C1:R3992C19", Version:=6).CreatePivotTable _
        TableDestination:="FILTERED!R3C1", TableName:="TablaDinámica1", _
        DefaultVersion:=6
    Sheets("FILTERED").Select
    Cells(3, 1).Select

但是我不断收到错误 5（无效的过程调用或参数），即使我通过保存宏来做到这一点......我需要在每次宏运行时创建数据透视表。任何帮助将不胜感激。提前致谢！

标签： excelvbapivot-table

解决方案

我试图重现您的错误代码，我遇到此错误的唯一情况是当“过滤”表不存在时。您必须在开始创建数据透视表之前创建它。

例子 ：

Sheets.Add After:=ActiveSheet
ActiveSheet.Name = "FILTERED"
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
    "ALL_RECORDS!R1C1:R3992C19", Version:=6).CreatePivotTable _
    TableDestination:="FILTERED!R3C1", TableName:="TablaDinámica1", _
    DefaultVersion:=6
Sheets("FILTERED").Select
Cells(3, 1).Select

推荐阅读