使用 VBA 选择数据透视表数据范围

【问题标题】：Pivot table Data Range selection using VBA使用 VBA 选择数据透视表数据范围
【发布时间】：2020-02-05 23:00:06
【问题描述】：

我试图通过首先选择数据透视表中的数据来处理它，但总计除外。我仍然希望显示总计。当我写：

ActiveSheet.PivotTables("PivotTable1").DataBodyRange.select

我明白了：

（选择包括总计在内的所有数据）

但我希望它是这样的：

选择数据时如何忽略总计？

【问题讨论】：

在DataBodyRange 对象上使用Resize 和Offset 方法。

标签： excel vba pivot-table

【解决方案1】：

使用Resize，您可以更改所选范围的大小：

Dim rng As Range
Set rng = ActiveSheet.PivotTables(1).DataBodyRange
rng.Resize(rng.Rows.Count - 1, rng.Columns.Count - 1).Select

rng.Rows.Count - 1 负责将行数减少 1。我不得不将列压缩 1 以将两个总计排除在选择之外。

如果你不喜欢Dim，你可以一口气完成：

ActiveSheet.PivotTables(1).DataBodyRange.Resize(ActiveSheet.PivotTables(1).DataBodyRange.Rows.Count - 1, ActiveSheet.PivotTables(1).DataBodyRange.Columns.Count-1).Select

【讨论】：

请在你的回答中添加一些解释！