Some of the content in this topic may not be applicable to some languages.
Returns or sets an animation action for the Office Assistant. When this property is applied to the Assistant object and the Assistant supports the specified animation, the Assistant is animated immediately (if the Assistant is visible and enabled). When this property is applied to the Balloon object, the Assistant is animated only while the balloon is displayed. Read/write MsoAnimationType.
| MsoAnimationType can be one of these MsoAnimationType constants. |
| msoAnimationAppear |
| msoAnimationBeginSpeaking |
| msoAnimationCharacterSuccessMajor |
| msoAnimationCheckingSomething |
| msoAnimationDisappear |
| msoAnimationEmptyTrash |
| msoAnimationGestureDown |
| msoAnimationGestureLeft |
| msoAnimationGestureRight |
| msoAnimationGestureUp |
| msoAnimationGetArtsy |
| msoAnimationGetAttentionMajor |
| msoAnimationGetAttentionMinor |
| msoAnimationGetTechy |
| msoAnimationGetWizardy |
| msoAnimationGoodbye |
| msoAnimationGreeting |
| msoAnimationIdle |
| msoAnimationListensToComputer |
| msoAnimationLookDown |
| msoAnimationLookDownLeft |
| msoAnimationLookDownRight |
| msoAnimationLookLeft |
| msoAnimationLookRight |
| msoAnimationLookUp |
| msoAnimationLookUpLeft |
| msoAnimationLookUpRight |
| msoAnimationPrinting |
| msoAnimationRestPose |
| msoAnimationSaving |
| msoAnimationSearching |
| msoAnimationSendingMail |
| msoAnimationThinking |
| msoAnimationWorkingAtSomething |
| msoAnimationWritingNotingSomething |
Remarks
“Clippit” is the default Assistant, and msoAnimationIdle is the default animation type for the Assistant.
Depending on the selected Assistant, setting the Animation property may or may not result in an obvious animation. However, all MsoAnimationType constants are valid for all Assistants. Note that different constants may produce the same animation.
The following MsoAnimationType constants represent animations that repeat the specified action until the Assistant is dismissed or until the Animation property is reset with another animation:
| msoAnimationCheckingSomething
msoAnimationGetTechy msoAnimationListensToComputer msoAnimationSearching |
msoAnimationThinking
msoAnimationWorkingAtSomething msoAnimationWritingNotingSomething |
Example
This example displays the Office Assistant in a specific location and it sets several options before making the Assistant visible.
With Assistant
.On = True
.Visible = True
.Move xLeft:= 400, yTop:= 300
.MoveWhenInTheWay = True
.TipOfDay = True
.Animation = msoAnimationGreeting
End With