Returns a SetEffect object for the animation behavior. Read-only. You can use the SetEffect object to set the value of a property.

Syntax

expression.SetEffect

expression A variable that represents a AnimationBehavior object.

Return Value
SetEffect

Example

The following example adds a shape to the first slide of the active presentation and sets a set effect animation behavior.

Visual Basic for Applications 
Sub ChangeSetEffect() 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(msoAnimTypeSet) With bhvEffect.SetEffect .Property = msoAnimShapeFillColor .To = RGB(Red:=0, Green:=255, Blue:=255) End With End Sub

See also: