如何在 Excel 中刪除一個或多個資料透視表？

資料透視表是用於查看或計算 Excel 中數據的一項非常有用的功能，因此我們通常會將資料透視表插入到工作表或多個工作表中。但您知道如何刪除工作表或整個工作簿中的單個或多個資料透視表嗎？

刪除工作表中的一個資料透視表

使用 VBA 刪除整個工作簿中的所有資料透視表

刪除工作表中的一個資料透視表

在 Excel 中，您可以按照以下步驟刪除一個資料透視表：

1. 點擊資料透視表報表。請參見截圖：

2. 然後點擊 檢視 > 選擇 > 整個資料透視表 以選擇該資料透視表。請參見截圖：

提示：如果您使用的是 Excel 2013，請通過點擊 分析 > 選擇 > 整個資料透視表 來選擇整個資料透視表。

3. 按下鍵盤上的 刪除 按鈕，資料透視表將被移除。

使用 VBA 刪除整個工作簿中的所有資料透視表

如果您的工作簿中有許多資料透視表，逐一手動刪除它們會非常耗時。現在，您可以使用 VBA 一次性刪除它們。

1. 按 Alt + F11 打開 Microsoft Visual Basic for Applications 視窗。

2. 在視窗中，點擊 插入 > 模組 以顯示新的模組視窗，然後將以下 VBA 程式碼複製到模組視窗中。

VBA：刪除整個工作簿中的所有資料透視表。

Sub DeleteAllPivotTablesInWorkbook()
'Updateby20140618
Dim xWs As Worksheet
Dim xPT As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xPT In xWs.PivotTables
        xWs.Range(xPT.TableRange2.Address).Delete Shift:=xlUp
    Next
Next
End Sub

相關文章：

• 刪除 Excel 中的所有批註