¿Cómo ejecutar una macro basada en el valor de una celda en Excel?
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 igual a un texto específico con código VBA
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
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.

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.
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
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
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!