If you have a reference to the presentation then:

[VBA]objPptPres.SlideShowSettings.Run[/VBA]