ActionSettings Object

Example

Use the ActionSettings property to return the ActionSettings collection. Use ActionSettings(index), where index is either ppMouseClick or ppMouseOver, to return a single ActionSetting object. The following example specifies that the CalculateTotal macro be run whenever the mouse pointer passes over the shape during a slide show.

With ActivePresentation.Slides(1).Shapes(3) _ .ActionSettings(ppMouseOver) .Action = ppActionRunMacro .Run = "CalculateTotal" .AnimateAction = True End With

See also:

• Microsoft PowerPoint Object Model Overview
• ActionSettings Object Members
• AnimationSettings Object
• PlaySettings Object