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/
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/
Comentarios
Publicar un comentario