Excel VBA: Crear Nueva Línea en MsgBox (6 Ejemplos)

Hugh West

20-06-2023 Macros y VBA de Excel
  • Compartir Este
Hugh West

A menudo utilizamos MsgBox en VBA para mostrar la notificación después de ejecutar los códigos. A veces una sola línea no puede mostrar la salida correctamente. Entonces necesitamos añadir nuevas líneas De este artículo aprenderá 6 Macros útiles para añadir una nueva línea en MsgBox utilizando Excel VBA.

Descargar el cuaderno de prácticas

Puede descargar la plantilla de Excel gratuita desde aquí y practicar por su cuenta.

Crear nueva línea en MsgBox.xlsm

6 Ejemplos para Crear Nueva Línea en MsgBox Usando Excel VBA

1. Usar vbNewLine para Añadir Nueva Línea en MsgBox Usando Excel VBA

En este caso, utilizaremos vbNewLine en Macro VBA para añadir una línea en MsgBox. Voy a mostrar " ¡Hola! " en la primera línea y " Bienvenido a ExcelWIKI". en la segunda línea.

Pasos:

  • Pulse Alt + F11 para abrir el Ventana VBA .
  • Entonces haga clic en para insertar un módulo: Insertar ➤ Módulo .

  • Más tarde, escriba los siguientes códigos en él- 
 Sub NewLine_vbNewLine() MsgBox "¡Hola!" & vbNewLine & "Bienvenido a ExcelWIKI" End Sub

  • Entonces volver a su hoja y haga clic en para abrir el Macros cuadro de diálogo: Desarrollador ➤ Macros .

  • Seleccione el Nombre de la macro como se especifica en el códigos .
  • Por último, basta con pulsar Ejecutar .

Ahora echa un vistazo, vbNewLine muestra la salida en dos líneas .

Más información: VBA para generar varias líneas en el cuerpo del correo electrónico en Excel (2 métodos)

2. Usar vbCrLf para Crear Nueva Línea en MsgBox Usando VBA en Excel

Ahora utilizaremos otra constante de VBA - vbCrLf para crear una nueva línea en MsgBox También añadirá una nueva línea entre las dos líneas consecutivas.

Pasos:

  • En primer lugar, siga el los dos primeros pasos del primer método para insertar un módulo en el VBA
  • Entonces escriba a lo siguiente códigos en él- 
 Sub NewLine_vbCrLf() MsgBox "¡Hola!" & vbCrLf & vbCrLf & "Bienvenido a ExcelWIKI" End Sub

  • A continuación, siga el cuarto paso del primer método para abrir el Cuadro de diálogo de macros .
  • Seleccione Nombre de la macro y pulse Ejecutar .

La constante vbCrLf ha añadido una nueva línea con una línea de separación también.

Más información: Cómo Añadir una Línea en una Celda de Excel (5 Métodos Fáciles)

3. Insertar vbLf para Agregar Nueva Línea en MsgBox Usando Excel VBA

Usemos otra constante... vbLf para añadir un nueva línea en MsgBox en Excel VBA.

Pasos:

  • Siga las los dos primeros pasos del primer método para insertar un módulo en el VBA
  • Más tarde, escriba a lo siguiente códigos en él- 
 Sub NewLine_vbLf() MsgBox "¡Hola!" & vbLf & "Bienvenido a ExcelWIKI" End Sub

  • A continuación, siga el cuarto paso del primer método para abrir el Cuadro de diálogo de macros .
  • Más tarde, seleccione la opción Nombre de la macro como se menciona en los códigos y pulse Ejecutar .

Y poco después obtendrá el resultado deseado.

Más información: Cómo añadir una nueva línea con la fórmula CONCATENAR en Excel (5 maneras)

4. Aplicar Chr para Crear Nueva Línea en MsgBox Usando VBA en Excel

Aquí, vamos a utilizar dos constantes de VBA- Chr(13) & Chr(10) para añadir líneas.

Pasos:

  • Empiece por seguir el los dos primeros pasos del primer método para insertar un módulo en el VBA
  • Entonces escriba a lo siguiente códigos en él- 
 Sub NewLine_Chr() MsgBox "¡Hola!" & Chr(13) & Chr(10) & "Bienvenido a ExcelWIKI" End Sub

  • A continuación, siga el cuarto paso del primer método para abrir el Cuadro de diálogo de macros .
  • A continuación, seleccione el Nombre de la macro y pulse Ejecutar .

Comprueba que obtenemos el mismo resultado.

5. Añadir nueva línea dentro de la macro en Excel VBA

En los métodos anteriores, no hemos roto la línea en el código. Aquí, vamos a romper y añadir líneas dentro de los códigos.

Pasos:

  • En primer lugar, siga el los dos primeros pasos del primer método para insertar un módulo en el VBA
  • Siguiente, escriba a lo siguiente códigos en él- 
 Sub NewLine_within_Macro() MsgBox "¡Hola!" & vbCrLf & vbCrLf & _ "Bienvenido a ExcelWIKI" End Sub

  • Más tarde, siga el cuarto paso del primer método para abrir el Cuadro de diálogo de macros .
  • A continuación, seleccione Nombre de la macro y pulse Ejecutar .

Ahora ve, que macro tiene añadido una nueva línea mantener una línea de separación entre líneas.

Más información: Cómo hacer un salto de línea en Excel (4 maneras)

6. Incrustar VBA para Añadir Nuevas Líneas en MsgBox Usando Botón

En nuestro último método, realizaremos la tarea de una forma un poco diferente. Estableceremos un método botón para añadir líneas en MsgBox .

6.1 Botón para línea única

En primer lugar, vamos a hacer un botón para añadir una sola línea. Para ello, he hecho un conjunto de datos que representa tres celdas para dar entrada a Apellido , Dirección y Número de teléfono Cuando hagamos clic en el botón botón comprobará las celdas y si obtiene una celda vacía entonces mostrar el mensaje para esa célula.

  • Haga clic en como sigue: Desarrollador ➤ Insertar y luego seleccione el caja rectangular del Sección Controles de formulario .

  • Poco después, recibirá un signo más en el cursor, Haga clic con el botón izquierdo del ratón en el ratón y arrastre en el hoja para fijar el tamaño del botón .

  • Entonces haga clic con el botón derecho del ratón en su ratón en el botón y seleccione Editar texto del menú contextual para fijar el nombre del botón .

  • Tipo el Nombre y haga clic en cualquier lugar de la hoja.

  • De nuevo haga clic con el botón derecho del ratón en su ratón en el botón y seleccione Asignar macro del menú contextual para establecer un Macro .

  • En este momento, da un Nombre de la macro y pulse Nuevo .

  • Entonces tipo lo siguiente códigos - 
 Private Sub SingleLine_Button() Dim WS As Worksheet Set WS = Sheets("Single Line") If WS.Range("C4").Value = "" Then MsgBox "Please Insert Last Name!" End If If WS.Range("C5").Value = "" Then MsgBox "Please Insert Address!" End If If WS.Range("C6").Value = "" Then MsgBox "Please Insert Phone Number!" End If End Sub

Desglose de códigos

  • En primer lugar, he creado un Subprocedimiento SingleLine_Button .
  • A continuación, declaró una variable WS como Hoja de trabajo .
  • Luego usó tres Declaraciones IF para comprobar las células, si la celda está llena de valor entonces ignóralo y si obtiene una celda vacía mostrará el mensaje correspondiente a través de MsgBox .
  • Más tarde volver a su hoja y haga clic en el botón .

Como el Apellido está vacío, por eso muestra el mensaje de notificación.

  • Pulse OK y luego comprobará el segundo campo.

La segunda el campo está vacío también por lo que añadido una nueva línea para notificarlo .

Aquí, llené el primer campo y pulsó el botón, y ver que se saltó ese campo y saltó a la segundo campo para mostrar el mensaje.

6.2 Botón para varias líneas

Al asignar este botón, podremos añadir varias líneas a la vez en el cuadro de mensaje.

  • Primero, siga los 6 primeros pasos de la sección anterior para añadir un botón y asignar un macro .

  • Entonces tipo lo siguiente códigos en la macro 
 Sub Multiple_Line_Button() Dim WS As Worksheet Set WS = Sheets("Multiple Line") Dim Last_Name, Address, Phone, Error_msg As String Last_Name = Len(WS.Range("C4")) Address = Len(WS.Range("C5")) Phone = Len(WS.Range("C6")) If Last_Name = 0 Then Error_msg = "Please Insert Last Name!" End If If Address = 0 Then Error_msg = Error_msg & vbNewLine & "Please Insert Address!" End If Phone = 0Then Error_msg = Error_msg & vbNewLine & "¡Por favor, introduzca el número de teléfono!" End If If Error_msg "" Then MsgBox Error_msg, vbOKOnly, Title:="¡Precaución importante!" Exit Sub End If End Sub

Desglose de códigos

  • Aquí, he creado un Subprocedimiento Botón_línea_múltiple .
  • A continuación, declaró algunas variables WS En Hoja de trabajo y Apellidos , Dirección , Teléfono , Error_msg En
  • Más tarde, utilizó Len y Gama para fijar los campos.
  • Por último, utiliza Si las declaraciones para comprobar si los campos están vacíos o no Si está lleno, se omitirá y si no, se mostrarán los mensajes a través de MsgBox .
  • Por último devolver a la hoja y haga clic en el botón .

Y ver que está mostrando tres líneas para la tres campos como son todos vacío .

Llené el primer campo y ahora ver, sólo está mostrando mensajes para el 2 campos siguientes .

Más información: Cómo Poner Varias Líneas en una Celda de Excel (2 Maneras Fáciles)

Conclusión

Espero que los procedimientos descritos anteriormente será lo suficientemente bueno para crear una nueva línea en MsgBox utilizando Excel VBA. Siéntase libre de hacer cualquier pregunta en la sección de comentarios y por favor me dan retroalimentación.

Publicación anterior Cómo eliminar espacios en blanco en Excel (6 maneras fáciles)
Siguiente publicación Cómo Contar el Número de Caracteres en una Celda en Excel (6 Formas más Fáciles)

Hugh West es un capacitador y analista de Excel altamente experimentado con más de 10 años de experiencia en la industria. Tiene una Licenciatura en Contabilidad y Finanzas y una Maestría en Administración de Empresas. Hugh tiene una pasión por la enseñanza y ha desarrollado un enfoque de enseñanza único que es fácil de seguir y comprender. Su conocimiento experto de Excel ha ayudado a miles de estudiantes y profesionales en todo el mundo a mejorar sus habilidades y sobresalir en sus carreras. A través de su blog, Hugh comparte su conocimiento con el mundo, ofreciendo tutoriales gratuitos de Excel y capacitación en línea para ayudar a las personas y empresas a alcanzar su máximo potencial.