Classe AnimationSettings (PowerPoint VBA)

La classe AnimationSettings représente les effets spéciaux appliqués à l’animation de la forme spécifiée en cours de diaporama.

Set

Pour utiliser une variable de classe AnimationSettings, elle doit d'abord être instanciée, par exemple

Dim ass as AnimationSettings
Set ass = ActiveWindow.RangeFromPoint.AnimationSettings

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe AnimationSettings : Shape.AnimationSettings et ShapeRange.AnimationSettings

Propriétés

AdvanceMode Renvoie ou définit une valeur qui indique si l’animation de forme spécifiée avance seulement quand l’utilisateur clique dessus, ou automatiquement après un certain délai. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.AdvanceMode = ppAdvanceModeMixed

AdvanceTime Renvoie ou définit la durée, en secondes, au-delà de laquelle la forme spécifiée devient animée. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.AdvanceTime = 5

AfterEffect Renvoie ou définit une constante PpAfterEffect qui indique si la forme spécifiée apparaîtra estompée, masquée ou inchangée après avoir été compilée. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.AfterEffect = ppAfterEffectDim

Animate Détermine si la forme spécifiée est animée au cours d’un diaporama. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.Animate = msoTrue

AnimateBackground Si l’objet spécifié est une forme automatique, indique si la forme est animée séparément du texte qu’elle contient. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.AnimateBackground = msoTrue

AnimateTextInReverse Détermine si la forme spécifiée est construite en ordre inverse. Ne s’applique qu’aux formes pouvant être construites en plusieurs étapes (comme les formes contenant des listes). Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.AnimateTextInReverse = msoTrue

AnimationOrder Renvoie ou définit un nombre entier représentant la position de la forme spécifiée à l’intérieur de la collection de formes à animer. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.AnimationOrder = 2

ChartUnitEffect Renvoie ou définit une valeur indiquant si la plage graphique est animée par série, catégorie ou élément. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.ChartUnitEffect = ppAnimateByCategory

DimColor Cette propriété 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.

Dim cftDimColor As ColorFormat
Set cftDimColor = ActivePresentation.Slides(2).Shapes(2).AnimationSettings.DimColor

EntryEffect Pour l’objet AnimationSettings , cette propriété renvoie ou définit l’effet spécial appliqué à l’animation de la forme spécifiée. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.EntryEffect = ppEffectAirplaneLeft

Parent Renvoie l’objet parent de l’objet spécifié.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.AnimationSettings.Parent

PlaySettings Renvoie un objet PlaySettings qui contient des informations sur la façon dont le clip multimédia spécifié est joué pendant un diaporama. En lecture seule.

Dim pssPlaySettings As PlaySettings
Set pssPlaySettings = ActivePresentation.Slides(2).Shapes(2).AnimationSettings.PlaySettings

SoundEffect Renvoie un objet SoundEffect, qui représente le son devant être joué lors de la transition vers la diapositive spécifiée. En lecture seule.

Dim setSoundEffect As SoundEffect
Set setSoundEffect = ActivePresentation.Slides(2).Shapes(2).AnimationSettings.SoundEffect

TextLevelEffect Indique si le texte de la forme spécifiée est animé par des paragraphes de premier niveau, de deuxième niveau ou d’un autre niveau (jusqu’au cinquième). Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.TextLevelEffect = ppAnimateByAllLevels

TextUnitEffect Indique si le texte de la forme spécifiée est animé paragraphe par paragraphe, mot par mot ou lettre par lettre. Lecture-écriture.

ActivePresentation.Slides(2).Shapes(2).AnimationSettings.TextUnitEffect = ppAnimateByCharacter