Sequence.AddEffect (PowerPoint)

Retorna um objeto Effect que representa um novo efeito de animação adicionado à sequência de efeitos de animação.

AddEffect (Shape, effectId, Level, trigger, Index)

Dim effAddEffect As Effect
Set effAddEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence.AddEffect(Shape:=, effectId:=msoAnimEffect3DArrive)

Arguments

O seguinte argumento é opcional

Shape (Shape) - A forma à qual o efeito de animação será adicionado.

effectId (MsoAnimEffect) - O efeito de animação a ser aplicado.


Aqui você pode encontrar os valores possíveis para

MsoAnimEffect

Optional arguments

Os seguintes argumentos são opcionais

Level (MsoAnimateByLevel) - Para gráficos, diagramas ou texto, o nível ao qual o efeito de animação será aplicado. O valor padrão é msoAnimationLevelNone.


Aqui você pode encontrar os valores possíveis para

MsoAnimateByLevel

trigger (MsoAnimTriggerType) - A ação que dispara o efeito de animação. O valor padrão é msoAnimTriggerOnPageClick.


Os valores possíveis são

msoAnimTriggerAfterPrevious Depois que o botão Anterior foi clicado.
msoAnimTriggerMixed Ações mistas.
msoAnimTriggerNone Nenhuma ação está associada como o gatilho.
msoAnimTriggerOnMediaBookmark
msoAnimTriggerOnPageClick Quando uma página é clicada.
msoAnimTriggerOnShapeClick Quando uma forma é clicada.
msoAnimTriggerWithPrevious Quando o botão Anterior for clicado.

Index (Long) - A posição que o efeito irá ocupar na coleção dos efeitos animados. O valor padrão é -1 (adicionado ao final).