Note
Access to this page requires authorization. You can try signing in or changing directories.
Access to this page requires authorization. You can try changing directories.
Returns or sets the type of animation applied to the font. Read/write WdAnimation.
Syntax
expression .Animation
expression Required. A variable that represents a Font object.
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