VBA Add Series to Exploded Pie Chart

Finally managed to add a second Series to an Exploded Pie Chart.
But can't work out, how to have the whole procedure in one Macro.
How would I set 2 DataRanges in the first Macro?

Macro 1: CreateChart
Macro 2: AddSeries2
Macro 3: Format Series2 Labels+Explosion+AxisGroup, Series1 Explosion
Macro 4: Format Series1 Explosion

Also, I have to format the Series1 Explosion twice, Macros 3+4 (found out by clicking).
This can't be right, can it?

I've attached the xlsm.

Thanks again for any help!
Toni

Macro1: CreateChart

Please Login or Register  to view this content.

Macro2: AddSeries2

Please Login or Register  to view this content.

Macro 3: Format Series2 Labels+Explosion+AxisGroup, Series1 Explosion

Please Login or Register  to view this content.

Macro 4: Format Series1 Explosion

Please Login or Register  to view this content.

Andy, once again: wow!

Just one thing: it would be extra nice to have Series1 "on top". Might that be possible, too?
With another "Axis-Setting" maybe? (Took me a while to get that right as well.)

Thank you so much!
Toni

Ok, yes, makes sense.
Thank you so much!

To combine all of these steps into one macro, you need to copy the contents of each of your macros inside a single procedure. Replace the comments "Macro 1", "Macro 2", etc. with the contents of the corresponding macros. Note that you will also have to insert all the variables and function declarations used in your macros inside this combined procedure. After combining the macros into one, you can perform all the necessary actions in one operation, which should simplify your process of working with pie charts.