Partager via


Événement Application.PresentationOpen (PowerPoint)

Se produit après l’ouverture d’une présentation existante, lorsqu’elle est ajoutée à la collection Presentations .

Syntaxe

expression. PresentationOpen( _Pres_ )

Expression Expression qui renvoie un objet Application .

Parameters

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

Remarques

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

Si votre solution Visual Studio inclut la référence Microsoft.Office.Interop.PowerPoint , cet événement correspond aux types suivants :

  • Microsoft.Office.Interop.PowerPoint.EApplication_PresentationOpenEventHandler (le délégué PresentationOpen ).)

  • Microsoft.Office.Interop.PowerPoint.EApplication_Event.PresentationOpen (événement PresentationOpen ).)

Exemple

Cet exemple montre comment modifier la couleur d’arrière-plan du jeu de couleurs 3, puis appliquer le jeu de couleurs modifié à la présentation qui vient d’être ouverte et afficher celle-ci en mode Diapositive.

Private Sub App_PresentationOpen(ByVal Pres As Presentation) 
    With Pres 
        Set CS3 = .ColorSchemes(3) 
        CS3.Colors(ppBackground).RGB = RGB(240, 115, 100) 
        With Windows(1) 
            .Selection.SlideRange.ColorScheme = CS3 
            .ViewType = ppViewSlide 
        End With 
    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.