Assistant Property

object that represents the Microsoft Office Assistant.

expression.Assistant

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

This example displays the Office Assistant.

Sub ShowAssistant()
    Assistant.Visible = True
End Sub
		

This example moves the Office Assistant to the upper left corner of the screen and displays a custom message in a balloon.

Sub ShowAssistantUpperLeft()
    Dim blnAssistant As Balloon

    With Assistant
        Set blnAssistant = .NewBalloon

        'Moves the Office Assistant
        .Move xLeft:=100, yTop:=100

            'Sets and displays a message with the Office Assistant
            With blnAssistant
                .Mode = msoModeAutoDown
                .Text = "What may I do for you today?"
                .Button = msoButtonSetTipsOptionsClose
                .Show
            End With

    End With

End Sub