Muokkaa

Jaa


Application.PresentationSave event (PowerPoint)

Occurs before any open presentation is saved.

Syntax

expression. PresentationSave( _Pres_ )

expression A variable that represents an Application object.

Parameters

Name Required/Optional Data type Description
Pres Required Presentation The presentation to be saved.

Remarks

For information about using events with the Application object, see How to: Use Events with the Application Object.

Example

This example saves the current presentation as an HTML version 4.0 file with the name "mallard.htm." It then displays a message indicating that the current named presentation is being saved in both PowerPoint and HTML formats.

Private Sub App_PresentationSave(ByVal Pres As Presentation)
    With Pres.PublishObjects(1)

        PresName = .SlideShowName
        .SourceType = ppPublishAll
        .FileName = "C:\HTMLPres\mallard.htm"
        .HTMLVersion = ppHTMLVersion4

        MsgBox ("Saving presentation " & "'" _
            & PresName & "'" & " in PowerPoint" _
            & Chr(10) & Chr(13) _
            & " format and HTML version 4.0 format")
			
        .Publish
    End With
End Sub

See also

Application Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.