SourceData 属性

       

返回数据透视表的数据源,如下表所示。Variant 类型,可读写。

数据源 返回值
Microsoft Excel 列表或数据库 以文本形式返回的单元格引用。
外部数据源 数组。每行包含一个 SQL 连接字符串,该行的剩余元素作为查询字符串,以 255 个字符为单位分段。
多重合并区域 二维数组。每行由一个引用及与其相关联的页字段项组成。
其他数据透视表 以上三种情形之一。

说明

该属性不可用于 OLE DB 数据源。

示例

假定使用外部数据源在 Sheet1 中创建数据透视表。本示例向新工作表中插入 SQL 连接字符串和查询字符串。

Set newSheet = ActiveWorkbook.Worksheets.Add
sdArray = Worksheets("Sheet1").UsedRange.PivotTable.SourceData
For i = LBound(sdArray) To UBound(sdArray)
    newSheet.Cells(i, 1) = sdArray(i)
Next i