RotationEffect.To プロパティ (PowerPoint)

1 つ の画面を基準にオブジェクトの回転を終了を表すを取得または設定 (たとえば、90 度は完全に水平方向)。 値の取得と設定が可能です。

構文

式。 To

式RotationEffect オブジェクトを表す変数。

戻り値

1 行

注釈

1 つの回転角度から別切り替えるには、このプロパティを From プロパティと共に使用します。

オブジェクトの現在の位置を使用する場合に既定値が 空 です。

このプロパティを ToX または、 ScaleEffect および MotionEffect オブジェクトの拡大/縮小またはアニメーション効果にのみ使用される おもちゃ のプロパティを混同しないでください。

例

次の使用例は、回転効果を追加し、その回転角度をすぐに 90 度から 270 度に変更します。

Sub AddAndChangeRotationEffect()

    Dim effBlinds As Effect
    Dim tmlTiming As TimeLine
    Dim shpRectangle As Shape
    Dim animColor As AnimationBehavior
    Dim rtnEffect As RotationEffect

    Set shpRectangle = ActivePresentation.Slides(1).Shapes(1)
    Set tmlTiming = ActivePresentation.Slides(1).TimeLine
    Set effBlinds = tmlTiming.MainSequence.AddEffect(Shape:=shpRectangle, _
        effectId:=msoAnimEffectBlinds)
    Set animColor = tmlTiming.MainSequence(1).Behaviors.Add(Type:=msoAnimTypeRotation)
    Set rtnEffect = animColor.RotationEffect
    rtnEffect.From = 90
    rtnEffect.To = 270

End Sub

関連項目

RotationEffect オブジェクト

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

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