Método Effect.MoveTo (PowerPoint)

Mueve el objeto especificado a una ubicación específica en la misma colección y vuelve a numerar correctamente el resto de elementos de la colección.

Sintaxis

expresión. MoveTo( _toPos_ )

Expresión Variable que representa un objeto Effect .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
toPos	Obligatorio	Long	Posición de índice a la que se va a mover el efecto de animación.

Ejemplo:

Este ejemplo mueve un efecto de animación al segundo efecto de la colección de efectos de animación para la forma especificada.

Sub MoveEffect()

    Dim sldFirst as Slide
    Dim shpFirst As Shape
    Dim effAdd As Effect

    Set sldFirst = ActivePresentation.Slides(1)
    Set shpFirst = sldFirst.Shapes(1)
    Set effAdd = sldFirst.TimeLine.MainSequence.AddEffect _
        (Shape:=shpFirst, effectId:=msoAnimEffectBlinds)

    effAdd.MoveTo toPos:=2

End Sub

Este ejemplo mueve la segunda diapositiva de la presentación activa a la primera diapositiva.

Sub MoveSlideToNewLocation()
    ActivePresentation.Slides(2).MoveTo toPos:=1
End Sub

Consulte también

Objeto Effect

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.