Propriedade AnimationSettings.AnimateBackground (PowerPoint)

Se o objeto especificado for uma AutoForma, especifica se a forma será animada separadamente do texto que contém. Leitura/gravação.

Sintaxe

expression. AnimateBackground

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

Comentários

Use as propriedades TextLevelEffect e TextUnitEffect para controlar a animação do texto anexado à forma especificada.

Se a forma especificada for um objeto gráfico, o valor da propriedade for msoTrue, se o plano de fundo (os eixos e linhas de grade) do objeto gráfico especificado for animado. A propriedade se aplica apenas às AutoFormas com texto que pode ser criada em mais de uma única etapa ou a objetos gráficos.

Se essa propriedade for definida como msoTrue e a propriedade TextLevelEffect for definida como ppAnimateByAllLevels, a forma e seu texto são animados simultaneamente. Se essa propriedade for definida como msoTrue e a propriedade TextLevelEffect for definida como algo diferente de ppAnimateByAllLevels, a forma será animada imediatamente antes que o texto será animado.

Os efeitos da definição dessa propriedade não são aparentes, a menos que a forma especificada será animada. Para uma forma seja animada, a propriedade TextLevelEffect para a forma deve ser definida como algo diferente de ppAnimateLevelNone e ou a propriedade Animate deve ser definida como msoTrue ou a propriedade EntryEffect deve ser definida como uma constante diferente ppEffectNone.

O valor da propriedade AnimateBackground pode ser uma destas constantes MsoTriState.

Constante	Descrição
msoFalse	A forma especificada não será animada separadamente do texto que contém.
msoTrue	A forma especificada será animada separadamente do texto que contém.

Exemplo

Este exemplo cria um retângulo que contém texto. O exemplo especifica então que a forma deve voar do canto inferior direito, que o texto deve ser criado a partir de parágrafos de primeiro nível e que a forma deve ser animada separadamente do texto que contém. Neste exemplo, a propriedade EntryEffect ativa animação.

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

Confira também

Objeto AnimationSettings

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.