Skip to main content

¿Cómo ejecutar una macro basada en el valor de una celda en Excel?

Author: Xiaoyang Last Modified: 2025-06-04

Supongamos que tengo varios códigos de macro en mi libro de trabajo, y ahora quiero ejecutar estos códigos basándome en el valor de la celda. En este artículo, hablaré sobre varias situaciones que podrías haber enfrentado en tu trabajo diario al usar Excel.

Ejecutar o activar una macro si el valor de la celda es mayor o menor que un valor específico con código VBA

Ejecutar o activar una macro si el valor de la celda es igual a un texto específico con código VBA


arrow blue right bubble Ejecutar o activar una macro si el valor de la celda es mayor o menor que un valor específico con código VBA

Por ejemplo, si el valor en la celda A1 está entre 10 y 50, ejecuta Macro1, y si el valor es mayor que 50, ejecuta Macro2. Para resolver esta tarea en Excel, por favor aplica el siguiente código VBA.

1. Haz clic derecho en la pestaña de la hoja donde deseas ejecutar la macro basada en un valor de celda, y luego selecciona Ver Código desde el menú contextual; en la ventana abierta de Microsoft Visual Basic para aplicaciones, copia y pega el siguiente código en el Módulo en blanco:

Código VBA: Ejecutar macro si el valor de la celda es mayor o menor que:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    If Target.Cells.Count > 1 Then Exit Sub
    If IsNumeric(Target) And Target.Address = "$A$1" Then
        Select Case Target.Value
        Case 10 To 50: Macro1
        Case Is > 50: Macro2
        End Select
    End If
End Sub

right click the sheet tab and select view code then pase the code into the module 1

Nota: En el código anterior:

A1 es la celda que contiene el valor específico en el que deseas basar la ejecución de la macro;

Case 10 To 50: Macro1: significa que si el valor está entre 10 y 50, se ejecutará Macro1;

Case Is > 50: Macro2: significa que si el valor es mayor que 50, se ejecutará Macro2.

Por favor, cambia los nombres de estas macros y los criterios según tus necesidades, y también puedes agregar más criterios siguiendo el script Case.

2. Luego guarda y cierra esta ventana de código. Ahora, cuando el valor que ingreses esté entre 10 y 50 en la celda A1, se activará Macro1; si el valor ingresado es mayor que 50, se ejecutará Macro2.

a screenshot of kutools for excel ai

Descubre la Magia de Excel con Kutools AI

  • Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
  • Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
  • Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
  • Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
  • Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Potencia tus capacidades de Excel con herramientas impulsadas por IA. ¡Descarga Ahora y experimenta una eficiencia como nunca antes!

arrow blue right bubble Ejecutar o activar una macro si el valor de la celda es igual a un texto específico con código VBA

Si quieres activar la macro basada en un texto específico en una celda, por ejemplo, ejecutar Macro1 si se ingresa el texto “Eliminar”, y ejecutar Macro2 si se escribe el texto “Insertar”. El siguiente código puede ayudarte.

1. Haz clic derecho en la hoja donde deseas ejecutar la macro basada en el valor de la celda, y luego selecciona Ver Código desde el menú contextual; en la ventana abierta de Microsoft Visual Basic para aplicaciones, copia y pega el siguiente código en el Módulo en blanco:

Código VBA: Ejecutar macro si el valor de la celda es un texto específico

Sub worksheet_change(ByVal target As Range)
Set target = Range("A1")
If target.Value = "Delete" Then
 Call Macro1
End If
If target.Value = "Insert" Then
Call Macro2
End If
End Sub 

right click the sheet tab and select view code then pase the code into the module 2

Nota: En el código anterior, “Eliminar” e “Insertar” son los textos de las celdas en los que deseas basar la ejecución de las macros, y Macro1 y Macro2 son las macros que deseas ejecutar basadas en el texto. Por favor, cámbialos según tus necesidades.

2. Luego guarda este código y cierra la ventana. Ahora, cuando ingreses el texto “Eliminar” en la celda A1, se activará Macro1; si se ingresa el texto “Insertar”, se ejecutará Macro2.


Artículos relacionados:

¿Cómo ejecutar una macro cuando cambia el valor de una celda en Excel?

¿Cómo ejecutar una macro automáticamente antes de imprimir en Excel?

¿Cómo ejecutar una macro basada en el valor seleccionado de una lista desplegable en Excel?

¿Cómo ejecutar una macro haciendo clic en hipervínculos en Excel?

¿Cómo ejecutar una macro cuando se selecciona una hoja de un libro de trabajo?

Las mejores herramientas de productividad para Office

🤖 Kutools AI Aide: Revoluciona el análisis de datos basado en: Ejecución inteligente | Generar código | Crear fórmulas personalizadas | Analizar datos y generar gráficos | Invocar Funciones mejoradas
Funciones populares: Buscar, resaltar o marcar duplicados | Eliminar filas en blanco | Combinar columnas o celdas sin perder datos | Redondear...
Super BUSCARV: Búsqueda por varios criterios | Búsqueda de varios valores | Búsqueda en varias hojas | Coincidencia difusa....
Lista desplegable avanzada: Crea rápidamente una lista desplegable | Lista desplegable dependiente | Lista desplegable de selección múltiple....
Administrador de columnas: Agregar un número específico de columnas | Mover columnas | Alternar el estado de visibilidad de columnas ocultas | Comparar rangos y columnas...
Funciones destacadas: Cuadrícula de enfoque | Vista de diseño | Barra de fórmulas mejorada | Administrador de Libro de trabajo y Hoja de cálculo | Biblioteca de AutoTexto | Selector de fechas | Combinar Datos | Cifrar/Descifrar celdas | Enviar correo electrónico por lista | Super Filtro | Filtro especial (filtrar celdas con fuente en negrita/cursiva/tachado...)...
Top15 conjuntos de herramientas:12 herramientas de texto (Agregar texto, Eliminar caracteres específicos, ...) | Más de50 tipos de gráficos (Diagrama de Gantt, ...) | Más de40 fórmulas prácticas (Calcular edad basada en la fecha de nacimiento, ...) |19 herramientas de inserción (Insertar código QR, Insertar imagen desde ruta, ...) |12 herramientas de conversión (Convertir a palabras, Conversión de moneda, ...) |7 herramientas para combinar y dividir (Combinar filas avanzado, Dividir celdas, ...) | ... y más

Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...


Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo

  • Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
  • ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!