AnimationBehavior.FilterEffect Property (PowerPoint)
Returns a FilterEffect object that represents a filter effect for an animation behavior. Read-only.
Syntax
expression .FilterEffect
expression A variable that represents a AnimationBehavior object.
Return Value
FilterEffect
Example
The following example adds a shape to the first slide of the active presentation and sets a filter effect animation behavior.
Sub ChangeFilterEffect()
Dim sldFirst As Slide
Dim shpHeart As Shape
Dim effNew As Effect
Dim bhvEffect As AnimationBehavior
Set sldFirst = ActivePresentation.Slides(1)
Set shpHeart = sldFirst.Shapes.AddShape(Type:=msoShapeHeart, _
Left:=100, Top:=100, Width:=100, Height:=100)
Set effNew = sldFirst.TimeLine.MainSequence.AddEffect _
(Shape:=shpHeart, EffectID:=msoAnimEffectChangeFillColor, _
Trigger:=msoAnimTriggerAfterPrevious)
Set bhvEffect = effNew.Behaviors.Add(msoAnimTypeFilter)
With bhvEffect.FilterEffect
.Type = msoAnimFilterEffectTypeWipe
.Subtype = msoAnimFilterEffectSubtypeUp
.Reveal = msoTrue
End With
End Sub