數據透視表使用VBA的數據範圍選擇

Question

我試圖通過首先選擇一個數據透視表中的數據，但除了大總計。 我仍然希望顯示總計。當我寫：

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

我得到這個：

（均包括總計數據被選中）

，但我希望它是這樣的：

如何在選擇數據時忽略總計？

Answer 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