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.
Contient les propriétés spécifiques aux espaces réservés telles que le type d’espace réservé.
Exemple
Utilisez la propriété PlaceholderFormatpour renvoyer un objet PlaceholderFormat . L’exemple suivant montre comment ajouter du texte dans l’espace réservé un de la diapositive 1 de la présentation active, à condition que cet espace réservé existe et qu’il soit destiné à contenir un titre horizontal.
With ActivePresentation.Slides(1).Shapes.Placeholders
If .Count > 0 Then
With .Item(1)
Select Case .PlaceholderFormat.Type
Case ppPlaceholderTitle
.TextFrame.TextRange = "Title Text"
Case ppPlaceholderCenterTitle
.TextFrame.TextRange = "Centered Title Text"
Case Else
MsgBox "There's no horizontal " _
"title on this slide"
End Select
End With
End If
End With
Voir aussi
Référence du modèle objet PowerPoint
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.