Use the Save method to save a presentation before closing its last window : ActivePresentation « PowerPoint « VBA / Excel / Access / Word

Home
VBA / Excel / Access / Word
1.Access
2.Application
3.Data Type
4.Data Type Functions
5.Date Functions
6.Excel
7.File Path
8.Forms
9.Language Basics
10.Math Functions
11.Outlook
12.PowerPoint
13.String Functions
14.Windows API
15.Word
16.XML
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
VBA / Excel / Access / Word » PowerPoint » ActivePresentation 
Use the Save method to save a presentation before closing its last window
 
Sub active()
    With ActivePresentation
        If .Path = "" Then
            MsgBox "Please save this presentation.", vbOKOnly
        Else
            .Save
            For Each myWindow In Windows
                .Close
            Next myWindow
        End If
    End With
End Sub

 
Related examples in the same category
1.Working with the Active Presentation
2.Closing a Window
3.Check the Path property of the Presentation object before using the Save method if you need to determine whether the presentation has been saved
4.Saving a Copy of a Presentation
java2s.com  |  | Contact Us | Privacy Policy
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.