Returns an object that represents the first animation started by the specified click number.

Syntax

expression.FindFirstAnimationForClick(click)

expression A variable that represents a Sequence object.

Parameters

Name Required/Optional Data Type Description
click Required Long The specified click number.

Return Value
Effect

Example

The following example finds the first animation for the first click of the first slide and changes the effect to a bounce.

Visual Basic for Applications 
Sub FindFirstAnimationClick() Dim sldFirst As Slide Dim effClick As Effect Set sldFirst = ActivePresentation.Slides(1) Set effClick = sldFirst.TimeLine.MainSequence _ .FindFirstAnimationForClick(Click:=1) effClick.EffectType = msoAnimEffectBounce End Sub

See also: