Partager via


Propriété AnimationSettings.DimColor (PowerPoint)

Renvoie ou définit un objet ColorFormat qui représente la couleur de la forme spécifiée après sa génération. En lecture seule.

Syntaxe

expression. DimColor

Expression Variable qui représente un objet AnimationSettings .

Valeur renvoyée

ColorFormat

Remarques

Si vous n’obtenez pas l’effet attendu, vérifiez vos autres paramètres de compilation. Vous ne verrez pas l’effet de la propriété DimColor , sauf si la propriété TextLevelEffect de l’objet AnimationSettings a une valeur autre que ppAnimateLevelNone, si la propriété AfterEffect a la valeur ppAfterEffectDim et que la propriété Animate a la valeur True. En outre, si la forme spécifiée est le seul élément ou le dernier à être compilé sur la diapositive, la forme n’est pas estompée. Pour modifier l’ordre de génération des formes d’une diapositive, utilisez la propriété AnimationOrder .

Exemple

Cet exemple montre comment ajouter dans la présentation active une diapositive contenant à la fois un titre et une liste de trois éléments, définit le titre et la liste pour qu’ils soient estompés après leur compilation, ainsi que la couleur d’estompage de chacun d’eux.

With ActivePresentation.Slides.Add(2, ppLayoutText).Shapes
    With .Item(1)
        .TextFrame.TextRange.Text = "Sample title"
        With .AnimationSettings
            .TextLevelEffect = ppAnimateByAllLevels
            .AfterEffect = ppAfterEffectDim
            .DimColor.SchemeColor = ppShadow
            .Animate = True
        End With
    End With

    With .Item(2)
        .TextFrame.TextRange.Text = "Item one" _
            & Chr(13) & "Item two"
        With .AnimationSettings
            .TextLevelEffect = ppAnimateByFirstLevel
            .AfterEffect = ppAfterEffectDim
            .DimColor.RGB = RGB(100, 150, 130)
            .Animate = True
        End With
    End With
End With

Voir aussi

AnimationSettings, objet

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.