Displaying a PivotTable's Name in the PivotTable

Written by Allen Wyatt (last updated November 19, 2022)
This tip applies to Excel 2007, 2010, 2013, 2016, 2019, 2021, and Excel in Microsoft 365


David wonders if there is a way to display a PivotTable's name within the PivotTable itself.

The short answer is that there is no way to do this automatically. The longer answer is that you can "cheat" and force a name into the PivotTable. For instance, you could select the row label cell in the PivotTable and edit it (F2), replacing whatever is there with whatever name you want to type. This is far from automatic, and when you refresh the PivotTable, you'll need to remember to edit the cell again.

Another way to force a name into the PivotTable is to use a macro. There are probably a few approaches you could take in your macro. One approach is to create a data table on which your PivotTable will be based. Give the data table a heading, in the first column. (Any old text for the heading will do, as the macro will overwrite it.)

After you create your PivotTable, run the following macro. It determines the name of the PivotTable, stuffs it into the heading of the data table, refreshes the PivotTable (so the name appears there), and then updates the name of the PivotTable report filter so it is the same as the PivotTable name.

Sub GetPVName()
    Dim pvt As PivotTable
    Dim PVName As String

    ' Get the PivotTable name from the ActiveSheet
    ' If there are multiple PivotTables, this approach
    ' ensures the macro will work with the last PivotTable
    ' in the PivotTables collection
    For Each pvt In ActiveSheet.PivotTables
        PVName = pvt.Name
    Next pvt

    ' Put PivotTable name as a heading for the first
    ' column of the data table
    Range("Table1").Cells(0, 1) = PVName

    ' Refresh the PivotTable
    ActiveSheet.PivotTables(PVName).PivotCache.Refresh

    ' Set the PivotTable name in the report filter
    With ActiveSheet.PivotTables(PVName).PivotFields(PVName)
        .Orientation = xlPageField
        .Position = 1
    End With
End Sub

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (3233) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, 2021, and Excel in Microsoft 365.

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

Fonts in the Font Drop-Down List

Ever wonder how to customize which fonts appear in the Font drop-down list? Making changes to this list is not easy. This ...

Discover More

Permanently Turning Off the Tracking of Formatting Changes

The Track Changes tool can be a great asset when you are working on a document with others. It can also be a hassle if ...

Discover More

Stepping Through a Non-Contiguous Range of Cells

Using macros to step through each cell in a selection is a common occurrence. What if that selected range is made up of ...

Discover More

Program Successfully in Excel! This guide will provide you with all the information you need to automate any task in Excel and save time and effort. Learn how to extend Excel's functionality with VBA to create solutions not possible with the standard features. Includes latest information for Excel 2024 and Microsoft 365. Check out Mastering Excel VBA Programming today!

More ExcelTips (ribbon)

Editing PivotTables without Underlying Data

If you ever try to edit a PivotTable and get an error that tells you that the "underlying data was not included," it can ...

Discover More

Counting Ports of Call with a PivotTable

A PivotTable is a great way to aggregate and analyze data. Sometimes, though, it can be difficult to figure out how to ...

Discover More

Reducing File Sizes for Workbooks with PivotTables

Need to reduce the size of your workbooks that contain PivotTables? Here's something you can try to minimize the ...

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}] (all 7 characters, in the sequence shown) 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 3 + 7?

There are currently no comments for this tip. (Be the first to leave your comment—just use the simple form above!)


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.