MoveWhenInTheWay Property Example

This example displays the Office Assistant in a specific location and it sets several options before making the Assistant visible and active.

With Assistant
    .On = True
    .Visible = True
    .Left = 400
    If Not MoveWhenInTheWay Then MoveWhenInTheWay = True
    .Animation = msoAnimationGetAttentionMajor
End With