Auto-adjusting Pivot Tables

I need a way to have a Pivot Table's report filter to automatically change based off of criteria without me having to manually change the Pivot Table. Attached is a file of what I am trying to as an example. Thank you for the help.

The arrow points to what cell should change. And there should be a validation list in B4 of 1,2,

So there is is a cell where i can select a rank (1,2,3), when it choose one of those, I want the pivot table filters to automatically change to what the data pulls; instead of me having to manually change the report filters every time. Does that help?

So if I wanted to have numerous pivot tables in a workbook, could I simply duplicate this macro and adjust each macro according to the individual pivot table names?

And would I be able to use this for multiple report filters?