Represents a set effect for an animation behavior. You can use the SetEffect object to set the value of a property.

Remarks

Use the SetEffect property of the object to return a SetEffect object. Set effects can be changed using the SetEffect object's Property and To properties.

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: