Skip to main content

¿Cómo hacer que aparezca un cuadro de mensaje si una celda es mayor o menor que un valor específico en Excel?

Author: Xiaoyang Last Modified: 2025-06-04

Si una celda es mayor o menor que otra celda, necesito que aparezca un cuadro de mensaje para alertar en Excel. ¿Cómo puedo resolver este problema en Excel? En este artículo, hablaré sobre algunos códigos para abordarlo.

Mostrar un cuadro de mensaje si el valor de la celda en una columna es mayor o menor que otra celda.

Mostrar un cuadro de mensaje si el valor de la celda en una celda es mayor o menor que otra celda.

Mostrar un cuadro de mensaje si el valor de la celda en una columna es mayor o menor que otra celda.

Supongamos que tengo un número específico 100 en la celda A1, ahora, cuando el número ingresado en la columna D sea mayor que 100 en la celda A1, debería aparecer un cuadro de mensaje para recordárselo al usuario.

Aquí, el siguiente código VBA puede ayudarte a completarlo, por favor sigue los siguientes pasos:

1. Ve a la hoja de trabajo que deseas utilizar.

2. Haz clic derecho en la pestaña de la hoja y selecciona Ver Código desde el menú contextual; en la ventana emergente Microsoft Visual Basic for Applications, copia y pega el siguiente código en la ventana Módulo en blanco, ver captura de pantalla:

Código VBA: mostrar un cuadro de mensaje si el valor de la celda en una columna es mayor o menor que una celda.

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Dim xC As String
Dim xWSName As String
Dim xA As String
xC = "D:D"
xWSName = "Sheet1"
xA = "A1"
    If Intersect(Target, Range("D:D")) Is Nothing Then Exit Sub
    If IsEmpty(Target) Then Exit Sub
    xNum = (Sheets(xWSName).Range(xA).Value)
    If (Target.Value) > (Sheets(xWSName).Range(xA).Value) Then
        MsgBox Prompt:="The entered number is greater than cell A1, please enter again! ", Title:="Kutools for Excel"
    End If
End Sub

Nota: En el código anterior, Hoja1 es tu hoja de trabajo que deseas usar; A1 es el valor de la celda con el que deseas comparar; D:D es la columna que deseas comparar con la celda A1.

click View Code from right click menu arrow right paste the vba code into the module

3. Luego, guarda y cierra la ventana de código; a partir de ahora, aparecerá un cuadro de mensaje si ingresas un número en la columna D que sea mayor que 100, ver captura de pantalla:

pop up message box if cell greatern or less than a specific value

Mostrar un cuadro de mensaje si el valor de la celda en una celda es mayor o menor que otra celda.

Si quieres que aparezca un cuadro de mensaje cuando el valor de una celda es mayor o menor que otra celda, por favor aplica el siguiente código:

1. Ve a la hoja de trabajo que deseas utilizar.

2. Haz clic derecho en la pestaña de la hoja y selecciona Ver Código desde el menú contextual; en la ventana emergente Microsoft Visual Basic for Applications, copia y pega el siguiente código en la ventana Módulo en blanco, ver captura de pantalla:

Código VBA: mostrar un cuadro de mensaje si el valor de la celda es mayor o menor que una celda.

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
On Error GoTo ExitSub
Dim One As Long
Dim Two As Long
One = Range("A1").Value
Two = Range("D1").Value
If Not (Application.Intersect(Range("A1:D1"), Target) Is Nothing) Then
If (One < Two) Then
MsgBox "The value in cell D1 cann't be greater than cell A1!", vbInformation, "Kutools for Excel"
End If
End If
ExitSub:
End Sub

Nota: En el código anterior, A1 y D1 son las dos celdas que deseas comparar.

3. Luego, guarda y cierra la ventana de código; al ingresar un valor que sea menor que el valor en la celda A1, aparecerá un cuadro de mensaje como se muestra en la siguiente captura de pantalla:

pop up message box if cell greatern or less than another cell value

Más artículos relacionados con cuadros de mensaje emergentes:

  • Crear un cuadro de mensaje emergente al abrir un archivo de Excel.
  • En ciertos casos, puede que quieras que siempre aparezca un cuadro de mensaje para recordarte lo que debes hacer primero al abrir un libro específico; esto puede ayudarte a recordar hacer lo más importante en tu trabajo diario. Y en este artículo, hablaré sobre cómo crear un cuadro de mensaje emergente al abrir un archivo de Excel.
  • Crear un cuadro de mensaje Sí/No antes de ejecutar una macro en Excel.
  • En Excel, puedes activar directamente una macro presionando la tecla F5 o haciendo clic en el botón Ejecutar en la ventana Microsoft Visual Basic for Applications. Pero, a veces, puede que quieras crear un cuadro de mensaje que pregunte al usuario si desea ejecutar la macro. Si es sí, entonces continúa ejecutando el código; si no, detén la ejecución del código. En este artículo, hablaré sobre cómo crear un cuadro de mensaje Sí/No antes de ejecutar una macro en Excel.
  • Crear un temporizador de cuadro de mensaje para cerrar automáticamente el cuadro de mensaje después de cierto tiempo.
  • Es posible que uses scripts VBA con frecuencia para resolver problemas mientras usas un libro de Excel. Y habrá cuadros de mensaje que aparecen durante la ejecución del script. En algunos casos, te gustaría que algunos cuadros de mensaje específicos se cerraran automáticamente después de un cierto tiempo en lugar de cerrarlos manualmente. En este artículo, te mostraremos el método para crear un temporizador de cuadro de mensaje para cerrar automáticamente el cuadro de mensaje después de cierto tiempo en Excel.
  • Barra de Fórmulas Super (editar fácilmente múltiples líneas de texto y fórmulas); Diseño de Lectura (leer y editar fácilmente grandes cantidades de celdas); Pegar en Rango Filtrado...
  • Combinar Celdas/Filas/Columnas manteniendo los datos; Dividir contenido de celdas; Combinar filas duplicadas y Sumar/Promediar... Prevenir celdas duplicadas; Comparar rangos...
  • Seleccionar filas duplicadas o únicas; Seleccionar filas en blanco (todas las celdas están vacías); Búsqueda Avanzada y Búsqueda Difusa en muchos libros de trabajo; Selección Aleatoria...
  • Copia Exacta de múltiples celdas sin cambiar la referencia de la fórmula; Crear automáticamente referencias a múltiples hojas; Insertar viñetas, casillas de verificación y más...
  • Favoritos e inserción rápida de fórmulas, rangos, gráficos e imágenes; Encriptar celdas con contraseña; Crear lista de correo y enviar correos electrónicos...
  • Extraer texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir estadísticas de página; Convertir entre el contenido de las celdas y los comentarios...
  • Super Filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes/semana/día, frecuencia y más; Filtro especial por negrita, cursiva...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión masiva de xls, xlsx y PDF...
  • Agrupación de Tabla Dinámica por número de semana, día de la semana y más... Mostrar celdas desbloqueadas, bloqueadas por diferentes colores; Resaltar celdas que tienen fórmula/nombre...
kte tab 201905
  • Habilitar edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abrir y crear varios documentos en nuevas pestañas de la misma ventana, en lugar de en ventanas nuevas.
  • ¡Aumenta tu productividad en un 50%, y reduce cientos de clics del ratón cada día!
officetab bottom