Nota
O acceso a esta páxina require autorización. Pode tentar iniciar sesión ou modificar os directorios.
O acceso a esta páxina require autorización. Pode tentar modificar os directorios.
Representa los efectos especiales aplicados a la animación de la forma especificada durante una presentación con diapositivas.
Ejemplo
Utilice AnimationSettingspropiedad del objeto Shape para devolver el objeto AnimationSettings. En el ejemplo siguiente se agrega una diapositiva que contiene un título y una lista de tres elementos a la presentación activa y, a continuación, Establece la lista se anime por párrafos de primer nivel, que entre volando desde la izquierda cuando la animación, que se atenúa al color especificado después de que se está animando y animar sus elementos en orden inverso.
Set sObjs = ActivePresentation.Slides.Add(2, ppLayoutText).Shapes
sObjs.Title.TextFrame.TextRange.Text = "Top Three Reasons"
With sObjs.Placeholders(2)
.TextFrame.TextRange.Text = _
"Reason 1" & VBNewLine & "Reason 2" & VBNewLine & "Reason 3"
With .AnimationSettings
.TextLevelEffect = ppAnimateByFirstLevel
.EntryEffect = ppEffectFlyFromLeft
.AfterEffect = ppAfterEffectDim
.DimColor.RGB = RGB(100, 120, 100)
.AnimateTextInReverse = True
End With
End With
Propiedades
Vea también
Referencia del modelo de objetos de PowerPoint
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.