Animation Property

  • Article

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

Applies to | Font Object

See Also | Font Property | ShowAnimation Property