通过

PowerPoint) (ColorEffect.To 属性

  • 项目

设置或返回一个 ColorFormat 对象，该对象表示 RGB 颜色值的动画行为。 读/写。

语法

expression。 To

表达 一个代表 ColorEffect 对象的变量。

返回值

ColorFormat

备注

将此属性与 From 属性联合使用过渡到从到另一种颜色。

不要混淆此属性与 ToX 或 玩具 的 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 支持和反馈，获取有关如何接收支持和提供反馈的指南。