Метод Slide.MoveTo (PowerPoint)

Статья
04/07/2023

Перемещает указанный объект в определенное расположение в той же коллекции, соответствующим образом перенумеруя все остальные элементы в коллекции.

Синтаксис

выражение. MoveTo( _toPos_ )

Выражение Переменная, представляющая объект Slide .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
toPos	Обязательный	Long	Позиция индекса, в которую перемещается эффект анимации.

Пример

В этом примере эффект анимации перемещается на второй в коллекции эффектов анимации для указанной фигуры.

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

В этом примере второй слайд активной презентации перемещается на первый.

Sub MoveSlideToNewLocation()

    ActivePresentation.Slides(2).MoveTo toPos:=1

End Sub

См. также

Объект Slide

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через