Returns or sets the type of animation applied to the font. Read/write WdAnimation.
| WdAnimation can be one of these WdAnimation constants. |
| wdAnimationBlinkingBackground |
| wdAnimationLasVegasLights |
| wdAnimationMarchingRedAnts |
| wdAnimationShimmer |
| wdAnimationMarchingBlackAnts |
| wdAnimationNone |
| wdAnimationSparkleText |
expression.Animation
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example animates the text in a new document.
Dim docNew As Document
Set docNew = Documents.Add
With docNew.Content
.InsertAfter "This is a test of animation."
.Font.Animation = wdAnimationLasVegasLights
End With
This example animates the selected text.
If Selection.Type = wdSelectionNormal Then
Selection.Font.Animation = wdAnimationShimmer
Else
MsgBox "You need to select some text."
End If