Compartilhar via


Propriedade Timing.TriggerType (PowerPoint)

Representa o gatilho que inicia uma animação. Leitura/gravação.

Sintaxe

expression. TriggerType

Expressão Uma variável que representa um objeto Timing .

Valor de retorno

MsoAnimTriggerType

Comentários

O valor da propriedade TriggerType pode ser uma destas constantes MsoAnimTriggerType. O padrão é msoAnimTriggerOnPageClick.

msoAnimTriggerAfterPrevious
msoAnimTriggerMixed
msoAnimTriggerNone
msoAnimTriggerOnPageClick
msoAnimTriggerOnShapeClick
msoAnimTriggerWithPrevious

Exemplo

O exemplo a seguir adiciona uma forma a um slide, adiciona uma animação à forma e instrui a forma para iniciar a animação três segundos após o clique sobre ela.

Sub AddShapeSetTiming() 
 
    Dim effDiamond As Effect 
    Dim shpRectangle As Shape 
 
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _ 
        .AddShape(Type:=msoShapeRectangle, Left:=100, _ 
        Top:=100, Width:=50, Height:=50) 
    Set effDiamond = ActivePresentation.Slides(1).TimeLine.MainSequence _ 
        .AddEffect(Shape:=shpRectangle, effectId:=msoAnimEffectPathDiamond) 
 
    With effDiamond.Timing 
        .Duration = 5 
        .TriggerType = msoAnimTriggerWithPrevious
        .TriggerDelayTime = 3 
    End With 
 
End Sub

Confira também

Objeto de intervalos

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.