Note
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Se produit après l’ouverture d’une présentation existante.
Syntaxe
expression.
AfterPresentationOpen( _Pres_ )
expression Expression qui renvoie un objet Application .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Prés | Requis | Presentation | Présentation ouverte. |
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 ouverte et afficher celle-ci en mode Diapositive.
Private Sub App_AfterPresentationOpen(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
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.