Visual Basic for Applications en ejemplos (III)

Nota: Antes de nada podrías ver  como habilitamos la ventana de Desarrollador(Programador):
http://alquimistadecodigo.blogspot.com/2018/06/visual-basic-for-applications-en_8.html


Ventanitas MsgBox

Síntaxis

MsgBox(prompt[, buttons] [, title] [, helpfile, context])

Ejemplos.

MsgBox "Hola, usuario. ¿Qué te parece el lenguaje VBA?"

MsgBox "¿Necesitas ayuda?",vbYesNoCancel+vbExclamation

MsgBox "¿Seguro quieres eliminar windows de tu sistema?", vbYesNo+vbInformation,"Aviso del sistema"

Dim Resultado As Boolean

Resultado = MsgBox "¿Deseas descargar archivo?",vbYesNo 

If Resultado=vbYes Then
    MsgBox "Descargar archivo"
Else
   MsgBox "Descarga cancelada"
End If

Ejemplo 1. Crearemos una hoja de excel habilitada para macros con el nombre Test.xlsm. En la pestaña Desarrollador vamos a Insertar. Saldrá una paleta de controles. Elegimos un CommandButton, le cambiamos el nombre por Activar. Para asignar macro a un botón puedes ver esto.

Abrimos el editor de código (Alt + F11).

Crearemos un procedimiento llamado Inicio.

Option Explicit ' Obligamos a declarar variables
Dim Anuncio As String 

Sub Inicio()

End Sub

Dentro de este procedimiento pegamos el siguiente código:

Anuncio = "Este es un simple mensaje"

MsgBox  Anuncio, vbInformation, "Aviso del sistema"

Damos clic al botón Activar.

Option Explicit ' Obligamos a declarar variables
Dim Anuncio As String
Sub Inicio()
     Anuncio = "Este es un simple mensaje"    MsgBox  Anuncio, vbInformation, "Aviso del sistema"
End Sub

Bastante sencillo, ¿no creen? En siguientes post veremos ejemplos más complejos.


Links
https://exceltotal.com/la-funcion-msgbox-en-vba/
https://support.office.com/es-es/article/asignar-una-macro-a-un-bot%C3%B3n-formulario-o-control-d58edd7d-cb04-4964-bead-9c72c843a283
https://analysistabs.com/vba/msgbox/