Classe AnimationPoints (PowerPoint VBA)

La classe AnimationPoints représente une collection de points d’animation pour un objet PropertyEffect .

Pour utiliser une variable de classe AnimationPoints, elle doit d'abord être instanciée, par exemple

Dim aps as AnimationPoints
Set aps = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Points

Les variables du type AnimationPoints peuvent être définies à l'aide de la procédure PropertyEffect.Points

Add

Renvoie un objet AnimationPoint qui représente un nouveau point d’animation.

Add (Index)

Index: Position du point d’animation par rapport aux autres points d’animation. La valeur par défaut est-1, ce qui signifie que si vous omettez le paramètre index, le nouveau point d’animation est ajouté à la fin des points d’animation existants.

Dim apt As AnimationPoint
Set apt = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Points.Add()

Count

Renvoie le nombre d'objets de la collection spécifiée. En lecture seule.

Dim lngCount As Long
lngCount = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Points.Count

Item

Cette méthode renvoie un seul objet AnimationPoint de la collection AnimationPoints spécifiée.

Item (Index)

Index: Numéro d’index de l’objet AnimationPoint unique à renvoyer dans la collection.

Dim apt As AnimationPoint
Set apt = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Points(Index:=1)

Smooth

Détermine si la transition d’un point d’animation à un autre est lissée. Lecture-écriture.

La valeur de la propriété Smooth peut être l’une de ces constantes MsoTriState .

ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Points.Smooth = msoTrue