This example displays the Office Assistant in a specific location and it sets several options before making the Assistant visible.
With Assistant
.Reduced = True
.Left = 400
.MoveWhenInTheWay = True
.TipOfDay = True
.Visible = True
.Animation = msoAnimationGreeting
End With