How to create a folder from open part files?

Here is a good one for you guys,

Has anyone ever had a need to isolate numerous part files from an assembly and place them somewhere else? I run into this often enough that now it is time to automate this if I can. Rather than select individual files from a existing widows folder, I would prefer to select them easily from an open assembly in SW. It would work like this: once I open all these part files, via right click open part, I would close the main assembly and be left with a number of open part files. (This is where a clever macro would come in handy.)  At this point I would run a macro to collect all open part files and place them in a new windows folder. Actually the same function as "pack and go" but have the ability to pack multiple parts instead of just one.

Any thoughts?

SolidworksApi macros