Oharra
Baimena behar duzu orria atzitzeko. Direktorioetan saioa has dezakezu edo haiek alda ditzakezu.
Baimena behar duzu orria atzitzeko. Direktorioak alda ditzakezu.
Determina si una animación debe acelerarse cuando se inicia. Lectura y escritura.
Sintaxis
expresión. SmoothStart
expresión Variable que representa un objeto Timing .
Valor devuelto
MsoTriState
Observaciones
El valor de la propiedad SmoothStart puede ser una de estas constantes MsoTriState.
| Constante | Descripción |
|---|---|
| msoFalse | Valor predeterminado. La animación no se acelera cuando comienza. |
| msoTrue | La animación se acelera cuando comienza. |
Ejemplo
En el siguiente ejemplo se agrega una forma a una diapositiva, se anima dicha forma y se establece que se acelere al iniciar.
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
.SmoothStart = msoTrue
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.