Hide Pivot Table Subtotals Using Macros In Excel

Excel Macros encompass a lot of functionality, and modifying Pivot Tables is one of them! Let us hide pivot table subtotals using Excel Macros!

Make sure your Excel has the Developer Tab enabled following this tutorial.

I explain how you can do this below step by step!

What does it do?

Hide the Pivot Table subtotals

Copy Source Code:

'Select a cell first from your pivot table
Sub HidePivotTableSubtotals()

Dim pTable As PivotTable
Dim pField As PivotField

On Error Resume Next

'Get the pivot table first
Set pTable = ActiveSheet.PivotTables(ActiveCell.PivotTable.name)

'Check if a pivot table is found
If pTable Is Nothing Then
MsgBox "Please select a cell first from your Pivot Table."
Exit Sub
End If

'For each subtotal, make it hidden
For Each pField In pTable.PivotFields
pField.Subtotals(1) = True
pField.Subtotals(1) = False
Next pField

End Sub

Final Result: 

Exercise Workbook:

---

This is our Pivot Table and we want to hide these subtotals:

STEP 1: Go to Developer > Code > Visual Basic

 

STEP 2: Paste in your code and Select Save. Close the window afterwards.

 

STEP 3: Let us test it out!

Open the sheet containing the data. Go to Developer > Code > Macros

 

Make sure your pivot table and macro are selected. Click Run.

 

With just one click, your Pivot Table subtotals are now hidden!

 

 

How to Hide Pivot Table Subtotals Using Macros In Excel