Class EffectInformation (PowerPoint VBA)

The class EffectInformation represents various animation options for an Effect object.


To use a EffectInformation class variable it first needs to be instantiated, for example

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

EffectInformation class variables can be set using the Effect.EffectInformation procedure.


Returns an PpAfterEffect constant that indicates whether an after effect appears dimmed, hidden, or unchanged after it runs.

Possible Values are msoAnimAfterEffectDim - Dimmed, msoAnimAfterEffectHide - Hidden, msoAnimAfterEffectHideOnNextClick - Hidden on the next mouse click, msoAnimAfterEffectMixed - Mixed, msoAnimAfterEffectNone - Unchanged.

The value returned by the AfterEffect property can be one of these PpAfterEffect constants.

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


Returns msoTrue if the specified effect is a background animation.

Use the TextLevelEffectand TextUnitEffect properties to control the animation of text attached to the specified shape. If this property is set to msoTrue and the TextLevelEffect property is set to ppAnimateByAllLevels, the shape and its text are animated simultaneously. If this property is set to msoTrue and the TextLevelEffect property is set to anything other than ppAnimateByAllLevels, the shape is animated immediately before the text is animated. You won't see effects of setting this property unless the specified shape is animated. For a shape to be animated, the TextLevelEffect property for the shape must be set to something other than ppAnimateLevelNone, and either the Animate property must be set to msoTrue, or the EntryEffect property must be set to a constant other than ppEffectNone. The value returned by the AnimateBackground property can be one of these MsoTriState constants.

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


Determines whether the specified shape is built in reverse order. Applies only to shapes (such as shapes containing lists) that can be built in more than one step.

The value of the AnimateTextInReverse Property property can be one of these MsoTriState constants.

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


Determines the level of the animation build effect.

Possible Values are msoAnimateChartAllAtOnce - Animate chart all at once, msoAnimateChartByCategory - Animate chart by category, msoAnimateChartByCategoryElements - Animate chart by category elements, msoAnimateChartBySeries - Animate chart by series, msoAnimateChartBySeriesElements - Animate chart by series elements, msoAnimateDiagramAllAtOnce - Animate diagram all at once, msoAnimateDiagramBreadthByLevel - Animate diagram breadth by level, msoAnimateDiagramBreadthByNode - Animate diagram breadth by node, msoAnimateDiagramClockwise - Animate diagram clockwise, msoAnimateDiagramClockwiseIn - Animate diagram clockwise in, msoAnimateDiagramClockwiseOut - Animate diagram clockwise out, msoAnimateDiagramCounterClockwise - Animate diagram counter-clockwise, msoAnimateDiagramCounterClockwiseIn - Animate diagram counter-clockwise in, msoAnimateDiagramCounterClockwiseOut - Animate diagram counter-clockwise out, msoAnimateDiagramDepthByBranch - Animate diagram depth by branch, msoAnimateDiagramDepthByNode - Animate diagram depth by node, msoAnimateDiagramDown - Animate diagram down, msoAnimateDiagramInByRing - Animate diagram in by ring, msoAnimateDiagramOutByRing - Animate diagram out by ring, msoAnimateDiagramUp - Animate diagram up, msoAnimateLevelMixed - Animate level mixed, msoAnimateLevelNone - Animate level none, msoAnimateTextByAllLevels - Animate text by all levels, msoAnimateTextByFifthLevel - Animate text by fifth level, msoAnimateTextByFirstLevel - Animate text by first level, msoAnimateTextByFourthLevel - Animate text by fourth level, msoAnimateTextBySecondLevel - Animate text by second level, msoAnimateTextByThirdLevel - Animate text by third level.

The value returned by the BuildByLevelEffect property can be one of these MsoAnimateByLevel constants.

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


Returns a ColorFormat object that represents the color to dim to after an animation is finished.

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


Returns the parent object for the specified object.


Returns a PlaySettings object that contains information about how the specified media clip plays during a slide show.

Dim pssPlaySettings As PlaySettings
Set pssPlaySettings = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.PlaySettings


Returns a SoundEffect object that represents the sound to be played during the transition to the specified slide.

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


Indicates whether the text in the specified shape is animated paragraph by paragraph, word by word, or letter by letter.

Possible Values are msoAnimTextUnitEffectByCharacter - By character, msoAnimTextUnitEffectByParagraph - By paragraph, msoAnimTextUnitEffectByWord - By word, msoAnimTextUnitEffectMixed - Mixed effect.

The value of the TextUnitEffect property can be one of these MsoAnimTextUnitEffect constants.

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