Change Pivot Table Field by Shape Selection Name

[speed88bump]

I have an Excel Sheet with the World Map placed on it as individual Shapes. USA's Shape name is S_USA and when selected I want to pass the Shape's Name to the Pivot Table Filter so I can see a list of Suppliers in That country. I already have the data set up to match the shapes names. Now it is a matter of creating the code to when user selects shape that shapes name is passed onto a cell (U2). How do I code that particular part? And how do I pass Cell U2 to the pivot table filter? I already have the workbook setup to change by target I just can't figure out the two items above.