Returns or sets a Single that represents the number of degrees an animated shape is rotated around the z-axis. A positive value indicates clockwise rotation; a negative value indicates counterclockwise rotation. Read/write.

Syntax

expression.Amount

expression A variable that represents an EffectParameters object.

Return Value
Single

Example

The following example adds a shape, and a 90-degree spin animation to the shape.

Visual Basic for Applications 
Sub SetAnimEffect() Dim effSpin As Effect Dim shpCube As Shape Set shpCube = ActivePresentation.Slides(1).Shapes.AddShape _ (Type:=msoShapeCube, Left:=100, Top:=100, _ Width:=50, Height:=50) Set effSpin = ActivePresentation.Slides(1).TimeLine _ .MainSequence.AddEffect(Shape:=shpCube, _ effectId:=msoAnimEffectSpin) effSpin.Timing.Duration = 3 effSpin.EffectParameters.Amount = -90 End Sub

See also: