EffectParameters オブジェクト (PowerPoint)

色、フォント、サイズ、および方向など、 Effect オブジェクトのさまざまなアニメーションのパラメーターを表します。

例

EffectParameters オブジェクトを取得するのにには、 Effect オブジェクトのEffectParametersプロパティを使用します。 次の使用例は、図形を作成し、塗りつぶし効果を設定して、最初と最後の塗りつぶしの色を変更します。

Sub effParam()

    Dim shpNew As Shape
    Dim effNew As Effect

    Set shpNew = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeHeart, Left:=100, _
        Top:=100, Width:=150, Height:=150)

    Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence _
        .AddEffect(Shape:=shpNew, EffectID:=msoAnimEffectChangeFillColor, _
        Trigger:=msoAnimTriggerAfterPrevious)

    With effNew.EffectParameters
        .Color1.RGB = RGB(Red:=0, Green:=0, Blue:=255)
        .Color2.RGB = RGB(Red:=255, Green:=0, Blue:=0)
    End With

End Sub

関連項目

PowerPoint Object Model Reference

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。