Using Classic PivotTable Layout as the Default

by Allen Wyatt
(last updated December 24, 2015)

13

Nancy creates a lot of PivotTables and likes the old layout better than the default set up in Excel 2010. Every time she creates a PivotTable she has to go to Options | Display | Classic PivotTable Layout. Nancy wonders if there is a way she can make the classic display the default.

There is no way to set this default, but it is possible to make the process a bit less painful. I created a PivotTable and left it empty, with nothing defined in the various sections of the PivotTable. With the PivotTable sheet visible, I turned on the macro recorder and recorded just the steps that Nancy mentioned, above. Here's what was recorded:

Sub Macro1()
'
' Macro1 Macro
'

'
    With ActiveSheet.PivotTables("PivotTable1")
        .InGridDropZones = True
        .RowAxisLayout xlTabularRow
    End With
End Sub

As you can see, there isn't much (programmatically) to changing back to classic layout—all you need to do is issue two statements that affect the PivotTable. This macro can be improved just a bit, however, by making it more "universal."

Sub PivotTableClassic()
    Dim pt As PivotTable

    For Each pt In ActiveSheet.PivotTables
        pt.InGridDropZones = True
        pt.RowAxisLayout xlTabularRow
    Next pt
End Sub

This version of the macro steps through each of the PivotTables on the current worksheet (if any) and applies those two statements that set them to classic layout.

The best idea we've been able to come up with is to assign this macro to the Quick Access Toolbar or to a shortcut key. Immediately after creating the macro, you can click the QAT button or press the shortcut key and Excel makes all the PivotTables on the sheet classic.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (3576) applies to Microsoft Excel 2007, 2010, and 2013.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He  is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Dynamic Worksheet Tab Names

Need a worksheet's name to change based on the contents of a cell? You'll need to rely on a macro to do the changing, but it ...

Discover More

Flipping Landscape Orientation when Printing

When printing a worksheet, you may want to rotate the output on the page to fit a certain orientation. Excel doesn't allow ...

Discover More

Inserting a Non-Breaking Space

In Word a non-breaking space will help you keep two words together on the same line. Here's two different ways that you can ...

Discover More

Program Successfully in Excel! John Walkenbach's name is synonymous with excellence in deciphering complex technical topics. With this comprehensive guide, "Mr. Spreadsheet" shows how to maximize your Excel experience using professional spreadsheet application development tips from his own personal bookshelf. Check out Excel 2013 Power Programming with VBA today!

More ExcelTips (ribbon)

Text Truncated in PivotTable

When you create a PivotTable based on data that contains lots of text, you may be surprised to find that your text is ...

Discover More

Easy Filtering Specifications for a PivotTable

When you want to include specific records from a source table into a PivotTable, you need to employ some sort of filtering. ...

Discover More

Suppressing Zero Values in PivotTables

PivotTables are great for digesting and analyzing huge amounts of data. But what if you want part of that data excluded, such ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is 9 - 2?

2017-02-04 06:39:36

Rao

Thank for this tip and it saved my time


2016-05-16 07:46:11

Genie

Hi Matt,

You're the best! Thank you!

Genie


2016-04-06 11:47:52

Lance

I am so glad I found this post in my Google Search. This "problem" has been annoying me for the better part of a year, and now I have a Quick Access Toolbar button to quickly make the switch. Much appreciated!

Thanks, Allen!!

Lance


2015-12-24 11:14:42

Nancy Harpe

Matt,
Great Tip for no Macros needed!!!I wish I had checked this out 2 years ago! I added these to my ribbon "do not show subtotals" and "show in tabular format". This is a great time saver! I must do 20+ pivot tables a week. Thanks!
Nancy


2015-06-08 15:54:39

Joyce

I love this! This will save me a lot time each week. Especially monthly for reports.


2015-04-22 01:14:23

Chetan

Thanks Matt, that was helpful


2015-02-05 04:19:45

Stu

Many thanks for this and to Demetria - what a time saver !!! :)

Cheers, Stu


2014-09-26 13:37:30

Demetria

Why change it after the fact? Create it directly as a classic pivot. From your source data, click Ctrl-P to run this macro. (You'll have to set up the shortcut, of course. You do that from the macro options).

Sub CreateClasicPivot()
'
' CreateClasicPivot Macro
'
' Keyboard Shortcut: Ctrl+Shift+P
'

Range("A1").Select
ActiveCell.CurrentRegion.Name = "myrange"
Application.CutCopyMode = False
ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
"myrange").CreatePivotTable TableDestination:="", TableName:= _
"PivotTable1"
ActiveSheet.PivotTableWizard TableDestination:=ActiveSheet.Cells(3, 1)
ActiveSheet.Cells(3, 1).Select
ActiveSheet.PivotTables("PivotTable1").SmallGrid = False

End Sub


2014-09-14 15:15:27

Mohan

Hi,

we are not able to view the "Pivots" in Excel 2007..


When we open the file we cant see the pivots... again we have to put the pivot tables and modify... the file...

Note: This is happening in only 2 in once file.

Regards,
Mohan


2014-03-25 17:31:44

Capsic

Allen, I realize this is an old post, so not sure if you will get this, but THANK YOU THANK YOU THANK YOU for the macro. Was about to go crazy with this.


2013-06-10 08:13:35

Rudra Sharma

@Matt druce
if you have macro you can change for each Pivot table in the workbook with single click.


2013-06-10 04:15:09

Matt Druce

You don't need a macro for switching to the classic layout, just use the two shortcut icons that you can add to your ribbon..."do not show subtotals" and "show in tabular format"

Build your pivot table, then two clicks and its done!


2013-06-08 05:24:55

bea

i found out that formatting sheet.provides.3 or w icons.with.layouts attached,and 1 of them is s
Classic display plus next to the se icons.are.icons to switch.totals,subtotals,etc what i normalny also.do.with the right mouse.click,soon after.changing layout.my.impression.is it saves.a.few clicks quite.well.just need to get used.to.it.


This Site

Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.