In Powerpoint I have slides where a shape (eg square) is overlaid with a number of text objects. Using VBA I need to set the font foreground color of the text to a contracting c