Utilizar Asistente(Assistant) de Excel

A veces resulta entretenido utilizar el asistente de Excel para enviar mensajes, alertas o ayuda al usuario


Algunos ejemplos de utilización del Assistant

1.- Para abrir el asistente

With Application.Assistant
.On = True
.Visible = True
.Animation = msoAnimationWritingNotingSomething
End With

Visualización:
2.- Para ocultarlo:

With Application.Assistant
.Visible = False
End With

3.-Para enviar un mensaje desde el asistente:

Application.Assistant.Visible = True
Application.ScreenUpdating = True
Application.Assistant.DoAlert _
"CasosResueltos.BlogSpot.com", _
"Gracias por tu visita", _
msoAlertButtonOK, _
msoAlertIconInfo, _
msoAlertDefaultFirst, _
msoAlertCancelFirst, False

Visualización:

Etas son solo algunas de las configuraciones del Assistant de Excel, espero ustedes descubran las demás.