Propiedad AnimationSettings.AnimateBackground (PowerPoint)

Si el objeto especificado es una autoforma, especifica si la forma se anima por separado del texto que contiene. Lectura y escritura.

Sintaxis

expresión. AnimateBackground

Expresión Variable que representa un objeto AnimationSettings .

Comentarios

Utilice las propiedades TextLevelEffect y TextUnitEffect para controlar la animación del texto adjunto a la forma especificada.

Si la forma especificada es un gráfico, el valor de la propiedad es msoTrue si el fondo (los ejes y las líneas de cuadrícula) del gráfico especificado está animado. La propiedad se aplica sólo a las autoformas con texto que puede crearse en más de un solo paso o a objetos de graph.

Si se establece esta propiedad en msoTrue y se establece la propiedad TextLevelEffecttiene el valor ppAnimateByAllLevels, la forma y el texto se animan simultáneamente. Si se establece esta propiedad en msoTrue y la propiedad TextLevelEffect está establecida en cualquier valor distinto de ppAnimateByAllLevels, la forma se anima inmediatamente antes de que la animación del texto.

Los efectos de establecer esta propiedad no están visibles a menos que la forma especificada se anima. Para una forma de realizar la animación, la propiedad TextLevelEffect de la forma debe establecerse en un valor distinto de ppAnimateLevelNone y bien la propiedad Animate debe establecerse en msoTrue, o bien la propiedad EntryEffect debe establecerse en una constante distinta de ppEffectNone.

El valor de la propiedad AnimateBackground puede ser una de estas constantes MsoTriState.

Constante	Descripción
msoFalse	La forma especificada no se anima por separado del texto que contiene.
msoTrue	La forma especificada se anima por separado del texto que contiene.

Ejemplo:

En este ejemplo se crea un rectángulo que contiene texto. A continuación, el ejemplo especifica que la forma debe volar desde la parte inferior derecha, que el texto se debe compilar a partir de párrafos de primer nivel y que la forma debe animarse por separado del texto que contiene. En este ejemplo, la propiedad EntryEffect activa la animación.

Sub AnimateTextBox()

    With ActivePresentation.Slides(1).Shapes.AddShape _
            (Type:=msoShapeRectangle, Left:=50, Top:=200, _
            Width:=200, Height:=200)

        .TextFrame.TextRange = "Reason 1" & Chr(13) & _
        "Reason 2" & Chr(13) & "Reason 3"

        With .AnimationSettings
            .EntryEffect = ppEffectFlyFromBottomRight
            .TextLevelEffect = ppAnimateByFirstLevel
            .TextUnitEffect = ppAnimateByParagraph
            .AnimateBackground = msoTrue
        End With
    End With

End Sub

Consulte también

Objeto AnimationSettings

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.