Macro to create Pivot Tables from data source of two Sheets

Hello All,

I am using Excel 2013 and I have a workbook with sheets name Eg: Main and SP

I need to create 4 pivot tables from these two sheets

Each sheet has two pivot tables one from each sheet i.e Main and SP

I need to have a macro which should create a Pivot Table and name the sheet for eg
If the pivot is made for the sheet Main then the new sheet name would be Pivot Main

And if it from sheet SP then the new sheet name would be Pivot SP

Please see the sample attached

Any help would be appreciated
Thanks