数据透视表的源数据答案

【问题标题】：Source data of a PIvot Table数据透视表的源数据
【发布时间】：2019-09-03 12:57:12
【问题描述】：

我正在创建一个VBA代码来创建一个数据透视表，但是每次我想运行代码时我的数据源长度都会改变，所以我想根据一个变量来引用它。

Dim SrcData As String

SrcData = "Range(Cells(4,1),Cells(lRowPTF,lColPTF))"

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
        SrcData, Version:=6).CreatePivotTable _
        TableDestination:="PT!R3C1", TableName:="PivotTable3", DefaultVersion _:=6

未创建数据透视表。

【问题讨论】：

使用此公式=OFFSET(SHEETNAME!A1,0,0,COUNTA(SHEETNAME!A:A),COUNTA(SHEETNAME!1:1)) 创建一个命名范围，这样您将拥有一个随数据增长的动态源。

标签： excel vba pivot-table

【解决方案1】：

尝试修改如下代码：

Dim SrcRng As Range
Dim SrcData As String

Set SrcRng = Range(Cells(4, 1), Cells(lRowPTF, lColPTF))
SrcData = SrcRng.Address(False, False, xlA1)

【讨论】：