Filtering a Pivot by user input value?

[JumboCactuar]

Hi,
I have a pivot table with the left column numbers 1-100
And I want to be able to filter between 2 numbers (from user inputboxs for min and max)

Eg. Numbers 11-20 or 1-80

Unsure how to do this,

Any help appreciated

 

[Worf]

Hi

https://www.wiseowl.co.uk/blog/s2458/inputbox.htm

Sub Macro21()
Dim pt As PivotTable
Set pt = ActiveSheet.PivotTables("pivot2")
pt.PivotFields("status").PivotFilters.Add2 Type:=xlValueIsBetween, DataField:= _
pt.PivotFields("Sum of amount"), Value1:=CDbl(InputBox("Enter min")), Value2:=CDbl(InputBox("Enter max"))
End Sub