Pausing your animations with VBA

tohlz — Sun, 10 Aug 2008 12:32:00 GMT

Lets say if you are running a slide that has multiple animations on it. Halfway through the presentation, you may want to pause the animations to explain something. A simple way to do this is to press the "b" key which will black out the screen. Then, press "b" key again to resume the presentation. The downside is that you won't be able to see the content on the screen.

To resolve this, you can make use of VBA. To do so, click Tools > Macro > Visual Basic Editor. Copy the code as shown below:

Sub pauseshow()
ActivePresentation.SlideShowWindow.View.State = ppSlideShowPaused
End Sub

Sub runshow()
ActivePresentation.SlideShowWindow.View.State = ppSlideShowRunning
End Sub

Close the editor once you are done.

Now, create two autoshapes.
Right click on the first one and select Action Settings. Select Run Macro > pauseshow. Click Ok.
Right click on the second one and select Action Settings. Select Run Macro > runshow. Click Ok.
Clicking on Shape 1 will now pause the presentation, while clicking on Shape 2 will resume the presentation.

The Art of PowerPoint-ing : vba

Pausing your animations with VBA