TipOfDay Property 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
    .Left = 400
    .MoveWhenInTheWay = True
    If Not TipOfDay Then TipOfDay = True
    .Animation = msoAnimationGreeting
End With