Excel 2007 VBA code to close powerpoint slide show, but not powerpoint application

[christopher@groth.cc]

Hi, I am trying to create VBA code which opens a powerpoint application, runs a specific powerpoint slideshow, then closes the slideshow, but leaves powerpoint open in the background. The code I have so far is:

Please Login or Register  to view this content.

This works, but it closes the powerpoint application, not only the slide show.

I have also tried this code:

Please Login or Register  to view this content.

This doesn't even start the slide show as I get a "Compile error: User defined type not defined" for

Dim PPApp As PowerPoint.Application

I have also tried combining elements of the two like this:

Please Login or Register  to view this content.

This opens and runs, but will not close, as I get the error

Run-time error '438': Object doesn't support this property or method

For the "PPPres.Close" command. I have also tries "PPPres.Presentations.Close" and:

Please Login or Register  to view this content.

but all with the same result. I can't think of any alternatives myself, so I need some genius help here.


Any help with this will be greatly appreciated!

Christopher

[Andy Pope]

This creates powerpoint app and opens a file.
I've included the command to run the slideshow if the fiile is not doing so automatically.

Please Login or Register  to view this content.

See this example for more detail on monitoring when it running.

[christopher@groth.cc]

Hi Andy,

Thanks, this works - to some extent It opens and starts, then closes the slideshow but leaves powerpoint open as I wanted. However, it doesn't actually show the presentation being run, that happens in the background. That was not the case before. I tried both with and without the run command, without a difference. Why is there a difference is behaviour, and is there some way of ensuring focus on the slide show being run?

Best
Christopher

[Andy Pope]

I guess I forgot to include the see example link.

http://officeone.mvps.org/vba/vb_run_complete_show.html

[christopher@groth.cc]

Thaks Andy. So is it the

State = SSW.View.State

that will bring focus to the presentation?

[Andy Pope]

Not really.

Please Login or Register  to view this content.

should start the slide show running. The view state is used to test what state the slide show is in.
Once it's finished code should the continue to close the presentation.

[christopher@groth.cc]

Ok, so your first short bit of code works for me in that it does not close powerpoint, only the slide show, but it opens the ppsx invisibly in the background, whereas with my original code it would open on top of excel, which is how I need it to work. Why would there be a difference, I cannot see it?

As of now the issue seems to be related to what I am doing on my second screen (I run the Excel sheet and the Powerpoint on my primary screen, but my Visual basic editor opens on a secondary screen). If I am working on some macros on the secondary screen the ppsx seems to open visibly on top of excel on the primary monitor, but if the secondary monitor is empty the ppsx opens invisibly. I haven't yet been able to identify exactly what triggers the ppsx to open visibly, but I can say that it never does so when I first run excel. Only after some fiddeling about with the Visual Basic editor will the ppsx show up. Strange...