2013-08-22 133 views
1

我想選擇一個使用VBA的數據透視表,並遇到一個問題,數據透視表可能從A3開始(如果沒有激活報告過濾器)或A6(如果3個報告過濾器已經選擇)等等。因此,數據透視表並不總是在工作表上的同一點上。清除數據透視表只會刪除所有數據和報表過濾器,但不會將數據透視表移回原始位置。是否有任何方法可以使用VBA來選擇數據透視表(以便能夠將數據複製並粘貼到新的工作表中),而不管它在工作表上的位置?VBA選擇數據透視表

謝謝。

更新 - 我已經想出瞭如何做到這一點。它真的很簡單:

Dim PT As PivotTable 
Set PT = ActiveSheet.PivotTables(1) 
PT.TableRange1.Select 
+0

你應該寫出來作爲一個答案,而不是編輯,並確認。 –

+0

謝謝 - 只要回答我自己的問題的時間到期,我會盡快完成! –

+2

既然您已經掌握瞭如何選擇數據透視表的方法,那麼您可能很想知道如何引用數據透視表的不同部分。樣本可以在這裏找到:http://peltiertech.com/WordPress/referencing-pivot-table-ranges-in-vba/ – tbur

回答

3

使用下面的代碼(樞軸表名PivotTable1給出):

Dim PT As PivotTable 
Set PT = ActiveSheet.PivotTables(1) 
PT.TableRange1.Select