Freigeben über


Application.PresentationSave-Ereignis (PowerPoint)

Tritt ein, bevor eine geöffnete Präsentation gespeichert wird.

Syntax

Ausdruck. PresentationSave( _Pres_ )

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Pres Erforderlich Presentation Die zu speichernde Präsentation.

Hinweise

Informationen zum Verwenden von Ereignissen mit dem Application-Objekt finden Sie unter Verwenden von Ereignissen mit dem Application-Objekt.

Beispiel

In diesem Beispiel wird die aktuelle Präsentation unter dem Namen mallard.htm als HTML-Datei der Version 4.0 gespeichert. Dann wird eine Meldung mit dem Hinweis angezeigt, dass die Datei unter dem aktuellen Namen sowohl im PowerPoint- als auch im HTML-Format gespeichert wird.

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

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.