VBA code to apply same filter to adjacent columns of pivot table.

Hi,
I am applying filter to pivot table from filters group.
Based on thesefilter I want adjacent three columns(right of pivot) to piviot table to have the same filter.
Note that these columns are not part of pivot table.
Thank you for your help.