Change Fill color using VBA in PowerPoint

[dibyendu2280]

There are more elegant (and less confusing) ways to do it using a UserForm and some lists

Let me know if youwant/need to upgrade the macros

Thanks Sir @Paul_Hossler
Yes I need the upgrade micros.
Sir want to implement above micros in my other project where hexagon shape is inside a group & wanted to change it to heptagon shape(there are other shape also ie rectangular shape) but gets error message "Selected Shape must be an AutoShape"
I uploaded the presentation. please look if possible. Thanks again.