Propriedade ScaleEffect.ByX (PowerPoint)
Define ou retorna um único que representa o dimensionamento ou movimentação de um objeto horizontalmente em uma porcentagem especificada da largura da tela, dependendo se ele usado em conjunto com um objeto ScaleEffect ou MotionEffect, respectivamente. Por exemplo, um valor de 50 para um efeito de movimento significa mover o objeto metade da largura da tela para a direita. Leitura/gravação.
Sintaxe
expression. ByX
Expressão Uma variável que representa um objeto ScaleEffect .
Valor de retorno
Único
Comentários
Números negativos movem o objeto horizontalmente para a esquerda. Números de pontos de flutuação (por exemplo, 55,5) são permitidos.
Para dimensionar ou mover um objeto verticalmente, use a propriedade ByY.
Se as propriedades de Propriedade ByX e ByY estiverem definidas, o objeto será dimensionado ou move horizontal e verticalmente.
Não confunda essa propriedade com a propriedade por dos objetos ColorEffect, RotationEffect ou PropertyEffect, que é usada para definir as cores, rotações ou outras propriedades de um comportamento de animação, respectivamente.
Exemplo
O exemplo a seguir adiciona um caminho para a animação; e define os movimentos vertical e horizontal da forma.
Sub AddMotionPath()
Dim effCustom As Effect
Dim animBehavior As AnimationBehavior
Dim shpRectangle As Shape
'Adds rectangle and sets effect and animation
Set shpRectangle = ActivePresentation.Slides(1).Shapes _
.AddShape(Type:=msoShapeRectangle, Left:=300, _
Top:=300, Width:=300, Height:=150)
Set effCustom = ActivePresentation.Slides(1).TimeLine _
.MainSequence.AddEffect(Shape:=shpRectangle, _
effectId:=msoAnimEffectCustom)
Set animBehavior = effCustom.Behaviors.Add(msoAnimTypeMotion)
'Specifies animation motion
With animBehavior.MotionEffect
.ByX = 50
.ByY = 50
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.