Oharra
Orrialde honetara sartzeak baimena behar du. Saioa hasteko edo direktorioak aldatzen saia zaitezke.
Orrialde honetara sartzeak baimena behar du. Direktorioak aldatzen saia zaitezke.
Representa el desencadenador que inicia la animación. Lectura y escritura.
Sintaxis
expresión. TriggerType
expresión Variable que representa un objeto Timing .
Valor devuelto
MsoAnimTriggerType
Observaciones
El valor de la propiedad TriggerType puede ser una de estas constantes MsoAnimTriggerType. El valor predeterminado es msoAnimTriggerOnPageClick.
| msoAnimTriggerAfterPrevious |
| msoAnimTriggerMixed |
| msoAnimTriggerNone |
| msoAnimTriggerOnPageClick |
| msoAnimTriggerOnShapeClick |
| msoAnimTriggerWithPrevious |
Ejemplo
En el siguiente ejemplo se agrega una forma a una diapositiva, se agrega una animación a dicha forma y se establece que la animación de la forma se inicie tres segundos después de hacer clic en ella.
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
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.