Save virtual parts with names

[lzauis]

Hi, I am trying to make a macro, that allows me to save the virtual parts in my assembly, and at the same time, rename those parts with a sequential number, for example if my assembly is called (12345) the parts should be 12345.01, 12345.02... etc...
I hope you can help me with that, or show me some macro guide that I can modify.
Thanks.