Свойство ScaleEffect.ToY (PowerPoint)

Возвращает или задает объект Single , представляющий конечную высоту объекта ScaleEffect , указанную в процентах от ширины экрана. Для чтения и записи.

Синтаксис

выражение. ToY

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

Возвращаемое значение

Одинарное с плавающей точкой

Замечания

Значение по умолчанию для этого свойства — Empty, в этом случае используется текущее положение объекта.

Используйте это свойство в сочетании со свойством FromY для изменения размера или перехода из одной позиции в другую.

Не путайте это свойство со свойством To объектов ColorEffect, RotationEffect или PropertyEffect , которые используются для задания или изменения цветов, поворотов или других свойств анимации соответственно.

Пример

В следующем примере добавляется путь анимации и задаются начальные и конечные горизонтальные и вертикальные позиции.

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

См. также

Объект ScaleEffect

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

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