Select a Shape with overlapping shapes on it as one shape and create a new file and paste

Hello ,

     Basically I do small designs and each of my file has lots of different icon like designs  that now I want to separate as individual shapes and paste those individual shapes into new file and save. I have tonnes of files like these and so I want to create a macro for this. Can anyone help.  I should be able to  write the code to copy and create new file and save it but before that I want to be able to write a code that would consider the overlapping shapes as one and treat them as one shape , so for each of those combined shape I could write a code to copy and paste in a new file .  Please check the file attached.

Now the shapes in these should be considered as three shapes though actual number of shapes are more. This should include text if thrs text on it.