Application.quit error

[Gregg Church]

When my vba code hits the Application.Quit method a Powerpoint must exit
error message box is created with the option to send the dump to MS.

I just want PPT to exit.

Is there something I'm doing wrong?

Here is the code:

Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
If SSW.View.CurrentShowPosition = _
SSW.Presentation.SlideShowSettings.StartingSlide Then
If CheckPath("U:\Logfiles\Powerpoint\NewShow.txt") Then
Application.Quit

End If
End Sub

Private Function CheckPath(strPath As String) As Boolean
If Dir$(strPath) <> "" Then
CheckPath = True
Else
CheckPath = False
End If
End Function


Thanks,

ggg

 

[Gregg Church]

I'm using Ppt 2003. The only addin I have is pptools.com - merge.

I'll try without it.

As a .pps this should still work yes?

ggg

 

[Gregg Church]

Ok the diagnostic tool reports:

COM add-ins
GoogleDesktop.OfficeAddin Google Desktop Office Addin
MultiMgrAddIn.AddInDesigner1 Microsoft PowerPoint Presenter Tools
PDFMaker.OfficeAddin Acrobat PDFMaker Office COM Addin

For some reason my macro keeps dissapearing from the list. The code is there
when I alt-f11 but it is not named when I goto run it... oh well.

ggg

 

[Gregg Church]

Ok, so, how do you kill a com addin?

ggg

KILL IT! KILL IT! KILL IT!

;-) Seriously, the google add-ins are known troublemakers.

They weren't watching their "Do no evil" sign the day they released that thing.
I'd uninstall it. I'm betting that's the problem.

This one's part of PPT and supplied by MS. Harmless.

Some versions of this may cause problems, but I'd leave it alone for now.


If you have several presentations open, it'll only appear in the Tools, Macros, Run
list if it's in the currently open presentation or if you choose "In all open
presentations" in the listbox below.

And it only shows you Public subs in regular modules (ie, not stuff in forms or
class modules). You could always add a little "stub" sub:

Sub Stub()
Call NameOfRoutineYouWantToRun
End Sub




==============================
PPT Frequently Asked Questions
http://www.pptfaq.com/

PPTools add-ins for PowerPoint
http://www.pptools.com/

 

[Gregg Church]

Thanks Steve I'll give it a try.

Any idea why no code works when I save this as a .pps?

ggg

 

[Gregg Church]

Sorry for the newb questions but... double clicking on a .pps opens the show
is that by default the viewer or full Powerpoint in show mode?

ggg

 

[Michael Koerner]

By default. .pps opens in slideshow mode, and .ppt opens in edit mode.
Except the Viewer opens everything in slideshow mode.

--
Michael Koerner
MS MVP - PowerPoint


Sorry for the newb questions but... double clicking on a .pps opens the show
is that by default the viewer or full Powerpoint in show mode?

ggg