Hi, Paul
Thanks for the reviewing!! Noticed that the data of the Tab - Reporting which was copied the filtered data from the original worksheet. Your advised code is great for creating pivot table with the requested data.

Quote Originally Posted by Paul_Hossler View Post
An alternate way would be to use the built in data filtering (or advanced data filtering) and then when you have only the data needed, copy to a new sheet and run the PT off of that


Option Explicit
'https://excel.tips.net/T002914_Limits_to_Filtering.html

Sub Macro2()
    
    On Error Resume Next
    Application.DisplayAlerts = False
    Worksheets("Reporting").Delete
    Application.DisplayAlerts = True
    On Error GoTo 0
    
    Worksheets.Add.Name = "Reporting"
    
    'with data filtered
    Worksheets("DataDataData").Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Copy Worksheets("Reporting").Range("A1")
    Worksheets("Reporting").Range("A1").CurrentRegion.EntireColumn.AutoFit
End Sub
The macro could be expanded to allow user to enter name of report sheet and automatically make the PT onto a third sheet, format, etc.

It's possible to get the names of the filter columns and the value(s) each is filtered on and make a report title