Partager via


Objet TextStyleLevels (PowerPoint)

Collection de tous les niveaux de texte du plan. Cette collection contient toujours cinq membres, chacun étant représenté par un objet TextStyleLevel .

Exemple

Utilisez Levels (index), où index est un nombre compris entre 1 et 5 qui correspond au niveau hiérarchique, pour renvoyer un seul objet TextStyleLevel . L’exemple suivant montre comment définir le nom et la taille de la police du texte de niveau un sur toutes les diapositives de la présentation active.

With ActivePresentation.SlideMaster _
        .TextStyles(ppBodyStyle).Levels(1)
    With .Font
        .Name = "Arial"
        .Size = 36
    End With
End With

L’exemple suivant montre comment définir la taille de la police du texte à chaque niveau hiérarchique de la zone des commentaires sur toutes les pages de commentaires de la présentation active.

With ActivePresentation.NotesMaster.TextStyles(ppBodyStyle).Levels

    .Item(1).Font.Size = 34

    .Item(2).Font.Size = 30

    .Item(3).Font.Size = 25

    .Item(4).Font.Size = 20

    .Item(5).Font.Size = 15

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.