PowerPoint) (ColorEffect.To 屬性

設定或傳回 ColorFormat 物件,代表動畫行為的 RGB 色彩值。 讀取/寫入。

語法

expression。 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 支援與意見反應。