Mega Code Archive

 
Categories / VisualBasic Script / Powerpoint
 

To start running a custom show

Sub slide()     With ActivePresentation.SlideShowSettings         .RangeType = ppShowNamedSlideShow         .SlideShowName = "Short Show"         .Run     End With End Sub