Apply Value Filter to Pivot table using VBA

[stroffso]

I have a list of properties in a Pivot table and want to have it so its like A Real Estate website where you choose between certain price points. Slicers dont really work as there are over 25 price points. I have done some research and there doesnt appear to be a kind of timeline for just values so what I am thinking is if I can have two cells, one with Minimum price (B7), one with Max Price (D7) then run some code so the value filters on PivotTable5 Column R "Sold Price" changes to be between those.

Is this possible?

 

[Worf]

What kind of field is "sold price"?

Sub Macro2()
' uses cells K15 and K16
Dim pt As PivotTable
Set pt = ActiveSheet.PivotTables("PivotTable2")
pt.PivotFields("category").PivotFilters.Add2 Type:=xlValueIsBetween, _
DataField:=pt.PivotFields("Sum of amount"), Value1:=[k15], Value2:=[k16]
End Sub