Name

Application.Assistant

Synopsis

Returns a reference to the annoying Office Assistant character . For example, the following code displays the assistant and then animates its departure:

Sub TestAssistant(  )
     Application.Assistant.Visible = True
     With Application.Assistant.NewBalloon
        .Text = "Ciao for now!"
        .Show
     End With
     Application.Assistant.Animation = msoAnimationGetArtsy
     Application.Assistant.Animation = msoAnimationGoodbye
End Sub

As of Office 2003, the assistant is no longer installed by default.

Get Programming Excel with VBA and .NET now with the O’Reilly learning platform.

O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.

Start your free trial