Mega Code Archive

 

Categories / VisualBasic Script / Powerpoint

 

Pausing the Show and Using White and Black Screens

Sub show()     ActivePresentation.SlideShowWindow.View.State = ppSlideShowBlackScreen     ActivePresentation.SlideShowWindow.View.State = ppSlideShowWhiteScreen End Sub