Opening ppt file in slideshow mode

[camg12]

I have built OpenPPT to open the specified powerpoint file. Is there a way to have it automatically open in Slideshow mode?

Public Function OpenPPT()
Dim PPObj As Object
Set PPObj = CreateObject("Powerpoint.Application")
PPObj.Visible = True
PPObj.Presentations.Open FileName:="test.pptx"
End Function

 

[HiTechCoach]

Have you tried using a PPSX?

PPS is the the show mode extension in PowerPoint 2003 and earlier -- these files run in "play-presentation" mode when double-clicked.

PPSX does the same thing in PowerPoint 2007 and later -- it runs in "play-presentation" mode when double-clicked.


By default, PPS and PPSX files open in slideshow (play-presentation) mode, and you see no PowerPoint interface. When the presentation finishes or you manually exit using tthe ESC key, PowerPoint also quits.