Show and hide assistant


Private Sub CommandButton1_Click()
With Assistant
    .Visible = True
    .Animation = msoAnimationGreeting
End With
End Sub

Private Sub CommandButton2_Click()
With Assistant
    .Visible = False
    .Animation = msoAnimationGreeting
End With

End Sub

Private Sub CommandButton3_Click()
With Assistant.NewBalloon
    .BalloonType = msoBalloonTypeBullets
    .Icon = msoIconTip
    .Button = msoButtonSetOK
    .Heading = “Tips for Saving Information.”
    .Labels(1).Text = “Save your work often.”
    .Labels(2).Text = “Install a surge protector.”
    .Labels(3).Text = “Exit your application properly.”
    .Show
End With

End Sub

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s