Propriedade AnimationBehavior.ScaleEffect (PowerPoint)
Retorna um objeto ScaleEffect para um determinado comportamento de animação. Somente leitura.
Sintaxe
expression. ScaleEffect
Expressão Uma variável que representa um objeto AnimationBehavior .
Valor de retorno
ScaleEffect
Exemplo
Este exemplo dimensiona a primeira forma do primeiro slide a partir de zero, aumentando em tamanho até alcançar 100% de seu tamanho original.
Sub ChangeScale()
Dim shpFirst As Shape
Dim effNew As Effect
Dim aniScale As AnimationBehavior
Set shpFirst = ActivePresentation.Slides(1).Shapes(1)
Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence _
.AddEffect(Shape:=shpFirst, effectId:=msoAnimEffectCustom)
Set aniScale = effNew.Behaviors.Add(msoAnimTypeScale)
With aniScale.ScaleEffect
'Starting size
.FromX = 0
.FromY = 0
'Size after scale effect
.ToX = 100
.ToY = 100
End With
End Sub
Confira também
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.