SmartArtColor Object (Office)
Chooses the color scheme for the SmartArt diagram.
Simulates the commands on the Microsoft Office Fluent Ribbon user interface on the SmartArt Tools tab, on the Design group, on the Change Colors command.
The following code sets the color scheme of the Smart Art diagram.
ActivePresentation.Slides(1).Shapes(1).SmartArt.Color = Application.SmartArtColors(1)