Partager via


Événement Application.PresentationSave (PowerPoint)

Cet événement se produit avant l’enregistrement des présentations ouvertes.

Syntaxe

expression. PresentationSave( _Pres_ )

expression Variable qui représente un objet « Application ».

Paramètres

Nom Requis/Facultatif Type de données Description
Prés Requis Presentation Présentation à enregistrer.

Remarques

Pour plus d’informations sur l’utilisation des événements avec l’objet Application, voir Utilisation des événements avec l’objet Application.

Exemple

Cet exemple enregistre la présentation active sous la forme de fichier HTML version 4.0, sous le nom « mallard.htm ». Ensuite, il affiche un message indiquant que la présentation en question est enregistrée à la fois au format PowerPoint et au format HTML.

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

Voir aussi

Objet Application

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.