Change Fill color using VBA in PowerPoint

[dibyendu2280]

Thanks Sir @Paul_Hossler
I am attached a small presentation where I want to change Blue color to any custom color.
With the help of above two code which u provided Red color changes to any custom color(solved).

Note: I name shape "hexagon1" to "Heptagon1", "Heptagon2" "Heptagon3".....in PowerPoint presentation ie in example.pptx