Macro to print each name in a pivot table filter drop-down on a seperate page

Hello,

Can anyone help me out with a macro that would print each name on a seperate page in the filter drop-down box of pivot table filter? (cell B6 on Statement tab)

Thanks!!