Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade AnimationSettings.TextUnitEffect (PowerPoint)AnimationSettings.TextUnitEffect Property (PowerPoint)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Indica se o texto na forma especificada é animado parágrafo por parágrafo, palavra por palavra ou letra por letra. Leitura/gravação.Indicates whether the text in the specified shape is animated paragraph by paragraph, word by word, or letter by letter. Read/write.

SintaxeSyntax

expressão. TextUnitEffectexpression. TextUnitEffect

expressão Uma variável que representa um objeto AnimationSettings .expression A variable that represents an AnimationSettings object.

Valor retornadoReturn Value

PpTextUnitEffectPpTextUnitEffect

ComentáriosRemarks

O valor da propriedade TextUnitEffect pode ser uma destas constantes PpTextUnitEffect .The value of the TextUnitEffect property can be one of these PpTextUnitEffect constants.

|| |:-----| |ppAnimateByCharacterppAnimateByCharacter| |ppAnimateByParagraphppAnimateByParagraph| |ppAnimateByWordppAnimateByWord| |ppAnimateUnitMixedppAnimateUnitMixed| Para a configuração da propriedade TextUnitEffect tenha efeito, a propriedade TextLevelEffect da forma especificada deve ter um valor diferente de ppAnimateLevelNone ou ppAnimateByAllLevelse a propriedade Animate deve ser definida como True.For the TextUnitEffect property setting to take effect, the TextLevelEffect property for the specified shape must have a value other than ppAnimateLevelNone or ppAnimateByAllLevels, and the Animate property must be set to True.

ExemploExample

Este exemplo adiciona um slide de título e um texto de título à apresentação ativa, e define que o título será composto letra por letra.This example adds a title slide and title text to the active presentation and sets the title to be built letter by letter.

With ActivePresentation.Slides.Add(Index:=1, _
    Layout:=ppLayoutTitleOnly).Shapes(1)

    .TextFrame.TextRange.Text = "Sample title"
    With .AnimationSettings
        .Animate = True
        .TextLevelEffect = ppAnimateByFirstLevel
        .TextUnitEffect = ppAnimateByCharacter
        .EntryEffect = ppEffectFlyFromLeft
    End With

End With

Ver tambémSee also

ConceitosConcepts

Objeto AnimationSettingsAnimationSettings Object

© 2018 Microsoft