Propiedad MotionEffect.ToY (PowerPoint)

Devuelve o establece un valor Single que representa la posición vertical de un objeto MotionEffect, especificado como un porcentaje del ancho de pantalla. Lectura y escritura.

Sintaxis

expresión. ToY

Expresión Variable que representa un objeto MotionEffect .

Valor devuelto

Simple

Comentarios

El valor predeterminado de esta propiedad está vacía, en cuyo caso la posición actual del objeto que se utiliza.

Utilice esta propiedad junto con la propiedad FromY para cambiar el tamaño o saltar de una posición a otra.

No confunda esta propiedad con la propiedad To de los objetos ColorEffect, RotationEffect o PropertyEffect, que se utiliza para establecer o cambiar colores, giros u otras propiedades de un comportamiento de animación, respectivamente.

Ejemplo:

En el siguiente ejemplo se agrega una ruta de animación y se establecen las posiciones iniciales y finales horizontal y vertical.

Sub AddMotionPath()

    Dim effCustom As Effect
    Dim animMotion As AnimationBehavior
    Dim shpRectangle As Shape

    'Adds shape and sets effect and animation properties
    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set effCustom = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpRectangle, effectId:=msoAnimEffectCustom)

    Set animMotion = effCustom.Behaviors.Add(msoAnimTypeMotion)

    'Sets starting and ending horizontal and vertical positions
    With animMotion.MotionEffect
        .FromX = 0
        .FromY = 0
        .ToX = 50
        .ToY = 50
    End With

End Sub

Consulte también

Objeto MotionEffect

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.