свойство ColorEffect.To (PowerPoint)

Задает или возвращает объект ColorFormat , представляющий значение цвета RGB для поведения анимации. Для чтения и записи.

Синтаксис

выражение. To

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

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

ColorFormat

Замечания

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

Не путайте это свойство со свойствами ToX или ToY объектов ScaleEffect и MotionEffect , которые используются только для масштабирования или эффектов движения.

Пример

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

Sub AddAndChangeColorEffect()

    Dim effBlinds As Effect
    Dim tmlTiming As TimeLine
    Dim shpRectangle As Shape
    Dim animColor As AnimationBehavior
    Dim clrEffect As ColorEffect

    Set shpRectangle = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeRectangle, Left:=100, _
        Top:=100, Width:=50, Height:=50)

    Set tmlTiming = ActivePresentation.Slides(1).TimeLine
    Set effBlinds = tmlTiming.MainSequence.AddEffect(Shape:=shpRectangle, _
        effectId:=msoAnimEffectBlinds)

    Set animColor = tmlTiming.MainSequence(1).Behaviors _
        .Add(Type:=msoAnimTypeColor)

    Set clrEffect = animColor.ColorEffect
    clrEffect.From.RGB = RGB(Red:=255, Green:=255, Blue:=0)
    clrEffect.To.RGB = RGB(Red:=0, Green:=255, Blue:=255)

End Sub

См. также

Объект ColorEffect

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

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