AnimateAction Property
Applies To
ActionSetting object.
Description
True if the color of the specified shape is momentarily inverted when the specified mouse action occurs. Read/write Long.
Example
This example sets shape three on slide one in the active presentation to play the sound of applause and to momentarily invert its color when it's clicked during a slide show.
With ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseClick)
.SoundEffect.Name = "applause.wav"
.AnimateAction = True
End With