Loop through dimension value as filter to refresh and copy pivot data

VB Macro to Select/Change Pivot Table Filter