how to create a pause action button

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I see the action buttons that will show in a slide show such as "go to next
slide" or "go back to the beginning". Is there an action button for "pause"?
If not, can I create one?
 
Unless you are into vba the easiest way is to create a one slide custom show
(make the slide then slide show > custom shows> new) Use the pause button to
hyperlink to it and then tick "show and return"

This method though will not continue to show the current screen during the
pause.

To pause you could also use the "S" key which will retain screen info

vba solution

Copy both these subs to a module in vb editor

With your pause button make the mouseover action macro - pauses and the
click action macro start again

Move the mouse over the button to pause and click when you want to restart
(or just use two buttons)

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

Sub startagain()
ActivePresentation.SlideShowWindow.View.State = ppSlideShowRunning
End Sub
--

Did that answer the question / help?
_____________________________
John Wilson
Microsoft Certified Office Specialist
http://www.technologytrish.co.uk/ppttipshome.html
 
John, Excellent!! Thanks so much.

John Wilson said:
Unless you are into vba the easiest way is to create a one slide custom show
(make the slide then slide show > custom shows> new) Use the pause button to
hyperlink to it and then tick "show and return"

This method though will not continue to show the current screen during the
pause.

To pause you could also use the "S" key which will retain screen info

vba solution

Copy both these subs to a module in vb editor

With your pause button make the mouseover action macro - pauses and the
click action macro start again

Move the mouse over the button to pause and click when you want to restart
(or just use two buttons)

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

Sub startagain()
ActivePresentation.SlideShowWindow.View.State = ppSlideShowRunning
End Sub
--

Did that answer the question / help?
_____________________________
John Wilson
Microsoft Certified Office Specialist
http://www.technologytrish.co.uk/ppttipshome.html
 
I tried this solution, but but got a DOS pop-up window telling me to "Press
any key to continue...".
 
Back
Top