Classe EffectInformation (PowerPoint VBA)

La classe EffectInformation représente diverses options d’animation pour un objet Effect .

Set

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

Dim ein as EffectInformation
Set ein = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).EffectInformation

Les variables du type EffectInformation peuvent être définies à l'aide de la procédure Effect.EffectInformation

AfterEffect

Renvoie une constante PpAfterEffect qui indique si un effet consécutif est estompé, masqué ou inchangé après son exécution. En lecture seule.

Valeurs possibles sont msoAnimAfterEffectDim - Estompés, msoAnimAfterEffectHide - HiddenHidden, msoAnimAfterEffectHideOnNextClick - Masqué lors du clic suivant, msoAnimAfterEffectMixed - Mixte, msoAnimAfterEffectNone - Inchangée.

La valeur renvoyée par la propriété aftereffect peut être l’une de ces constantes PpAfterEffect .

Dim maaAfterEffect As MsoAnimAfterEffect
maaAfterEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.AfterEffect

AnimateBackground

Renvoie msoTrue si l’effet spécifié est une animation d’arrière-plan. En lecture seule.

Utilisez les propriétés TextLevelEffectet TextUnitEffect pour contrôler l’animation du texte attaché à la forme spécifiée. Si cette propriété a la valeur msoTrue et la propriété TextLevelEffect la valeur ppAnimateByAllLevels, la forme et son texte sont animés simultanément. Si cette propriété est définie à msoTrue et si la propriété TextLevelEffect est définie à toute valeur autre que ppAnimateByAllLevels, la forme sera animée immédiatement avant le texte. Vous ne pouvez voir les effets que vous définissez pour une forme que si celle-ci est animée. Pour qu’une forme soit animée, la propriété TextLevelEffect de la forme doit avoir une valeur autre que ppAnimateLevelNoneet la propriété Animate doit avoir la valeur msoTrue, ou la propriété EntryEffect doit être défini sur une constante autre que ppEffectNone. La valeur renvoyée par la propriété AnimateBackground peut être l’une de ces constantes MsoTriState .

Dim mtsAnimateBackground As Office.MsoTriState
mtsAnimateBackground = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.AnimateBackground

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.

La valeur de la propriété de propriété AnimateTextInReverse peut être l’une de ces constantes MsoTriState .

Dim mtsAnimateTextInReverse As Office.MsoTriState
mtsAnimateTextInReverse = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.AnimateTextInReverse

BuildByLevelEffect

Détermine le niveau de l’effet de génération d’animation. En lecture seule.

Valeurs possibles sont msoAnimateChartAllAtOnce - Anime tous les graphiques en même temps, msoAnimateChartByCategory - Anime les graphiques par catégorie, msoAnimateChartByCategoryElements - Anime les graphiques par élément de catégorie, msoAnimateChartBySeries - Anime les graphiques par série, msoAnimateChartBySeriesElements - Anime les graphiques par élément de série, msoAnimateDiagramAllAtOnce - Anime tous les diagrammes en même temps, msoAnimateDiagramBreadthByLevel - Anime les diagrammes dans leur largeur par niveau, msoAnimateDiagramBreadthByNode - Anime les diagrammes dans leur largeur par nœud, msoAnimateDiagramClockwise - Anime les diagrammes dans le sens des aiguilles d’une montre, msoAnimateDiagramClockwiseIn - Anime les diagrammes dans le sens des aiguilles d’une montre vers l’intérieur, msoAnimateDiagramClockwiseOut - Anime les diagrammes dans le sens des aiguilles d’une montre vers l’extérieur, msoAnimateDiagramCounterClockwise - Anime les diagrammes dans le sens contraire des aiguilles d’une montre, msoAnimateDiagramCounterClockwiseIn - Anime les diagrammes dans le sens contraire des aiguilles d’une montre vers l’intérieur, msoAnimateDiagramCounterClockwiseOut - Anime les diagrammes dans le sens contraire des aiguilles d’une montre vers l’extérieur, msoAnimateDiagramDepthByBranch - Anime les diagrammes dans leur profondeur par branche, msoAnimateDiagramDepthByNode - Anime les diagrammes dans leur profondeur par nœud, msoAnimateDiagramDown - Anime les diagrammes vers le bas, msoAnimateDiagramInByRing - Anime les diagrammes vers l’intérieur sur l’anneau, msoAnimateDiagramOutByRing - Anime les diagrammes vers l’extérieur sur l’anneau, msoAnimateDiagramUp - Anime les diagrammes vers le haut, msoAnimateLevelMixed - Anime selon un niveau mixte, msoAnimateLevelNone - Anime selon aucun niveau, msoAnimateTextByAllLevels - Anime le texte selon tous les niveaux, msoAnimateTextByFifthLevel - Anime le texte selon le cinquième niveau, msoAnimateTextByFirstLevel - Anime le texte selon le premier niveau, msoAnimateTextByFourthLevel - Anime le texte selon le quatrième niveau, msoAnimateTextBySecondLevel - Anime le texte selon le second niveau, msoAnimateTextByThirdLevel - Anime le texte selon le troisième niveau.

La valeur renvoyée par la propriété BuildByLevelEffect peut être l’une de ces constantes MsoAnimateByLevel .

Dim mabBuildByLevelEffect As MsoAnimateByLevel
mabBuildByLevelEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.BuildByLevelEffect

Dim

Renvoie un objet ColorFormat qui représente la couleur d’estompage une fois l’animation terminée.

Dim cftDim As ColorFormat
Set cftDim = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.Dim

Parent

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

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 = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.PlaySettings

SoundEffect

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

Dim setSoundEffect As SoundEffect
Set setSoundEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.SoundEffect

TextUnitEffect

Indique si le texte de la forme spécifiée est animé paragraphe par paragraphe, mot par mot ou lettre par lettre. En lecture seule.

Valeurs possibles sont msoAnimTextUnitEffectByCharacter - Par caractère, msoAnimTextUnitEffectByParagraph - Par paragraphe, msoAnimTextUnitEffectByWord - Par mot, msoAnimTextUnitEffectMixed - Effet mixte.

La valeur de la propriété TextUnitEffect peut être l’une de ces constantes MsoAnimTextUnitEffect .

Dim matTextUnitEffect As MsoAnimTextUnitEffect
matTextUnitEffect = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).EffectInformation.TextUnitEffect