The following macro examples only work from within the PowerPoint application. Visual Basic for Applications macros are not supported by the Microsoft PowerPoint Viewer. As Long Dim TotalChanges As Long ' Used for error trapping. On Error Resume Next Err. Clear ' Initialize the counters.
Outer loop goes through every slide in the Active presentation.
For Each SlideObject In Application. Slides ' Inner loop goes through every shape in the presentation. For Each ShapeObject In SlideObject. Shapes With ShapeObject. This property must be set to True for any of the ' other properties of the AnimationSettings object ' to take effect.