propiedad RotationEffect.To (PowerPoint)

Establece o devuelve un valor Single que representa el giro de un objeto en grados, especificado con relación a la pantalla (por ejemplo, 90 grados es completamente horizontal). Lectura y escritura.

Sintaxis

expresión. To

Expresión Variable que representa un objeto RotationEffect .

Valor devuelto

Simple

Comentarios

Use esta propiedad junto con la propiedad From para pasar de un ángulo de giro a otro.

El valor predeterminado está vacío, en cuyo caso se utiliza la posición actual del objeto.

No confunda esta propiedad con la ToX o ToY de propiedades de los objetos ScaleEffect y MotionEffect, que sólo se usan para los efectos de ajuste y movimiento.

Ejemplo:

En este ejemplo se agrega un efecto de giro e inmediatamente después se modifica el ángulo de giro de 90 a 270 grados.

Sub AddAndChangeRotationEffect()

    Dim effBlinds As Effect
    Dim tmlTiming As TimeLine
    Dim shpRectangle As Shape
    Dim animColor As AnimationBehavior
    Dim rtnEffect As RotationEffect

    Set shpRectangle = ActivePresentation.Slides(1).Shapes(1)
    Set tmlTiming = ActivePresentation.Slides(1).TimeLine
    Set effBlinds = tmlTiming.MainSequence.AddEffect(Shape:=shpRectangle, _
        effectId:=msoAnimEffectBlinds)
    Set animColor = tmlTiming.MainSequence(1).Behaviors.Add(Type:=msoAnimTypeRotation)
    Set rtnEffect = animColor.RotationEffect
    rtnEffect.From = 90
    rtnEffect.To = 270

End Sub

Consulte también

RotationEffect (objeto)

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.