獲取選定的數據透視表名稱 - Excel VBA

Question

我在一張Excel表格上有兩個數據透視表。我想知道如何使用Excel VBA獲取所選數據透視表的名稱？

我試過ActiveSheet.PivotTables.Selected，但這不是受支持的屬性。

Answer 1

您只需使用：

ActiveCell.PivotTable.Name 

，或者有一點點錯誤處理：

Dim PT as PivotTable 
On Error Resume Next 
Set PT = Activecell.PivotTable 
On Error Goto 0 
If not PT is nothing then msgbox pt.name