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