Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo se ejecuta macro en función del valor de la celda en Excel?

Supongamos que tengo múltiples códigos de macro en mi libro de trabajo, y ahora quiero ejecutar estos códigos en función del valor de la celda. En este artículo, hablaré sobre varias situaciones que puede sufrir en su trabajo diario al usar Excel.

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

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

Ficha Office Habilite la edición y navegación con pestañas en Office y haga su trabajo mucho más fácil ...
Kutools for Excel trae las características avanzadas de 300 a Excel y aumenta su productividad en 80%
  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper 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 de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Kutools funciona con Office 2007-2019 y 365. Es compatible con todos los idiomas y es muy fácil de instalar o implementar. Funciones completas de prueba gratuita de 60-day.

flecha azul burbuja derecha Ejecutar o desencadenar macro si el valor de 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, ejecute macro1, y si el valor es mayor que 50, ejecute macro2. Para resolver este trabajo en Excel, aplique el siguiente código VBA.

1. Haga clic con el botón derecho en la pestaña de la hoja en la que desea ejecutar la macro en función del valor de la celda, y luego elija Ver código desde el menú contextual, y en el menú abierto Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en el Módulo en blanco:

Código de VBA: Ejecute macro si el valor de 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

doc run macro basado en el valor de celda 1

Nota: En el código anterior:

A1 es la celda que contiene el valor específico en el que desea ejecutar la macro;

Caso 10 a 50: Macro1: significa que si el valor está entre 10 y 50, ejecute Macro1;

Caso es> 50: Macro2: significa que si el valor es mayor que 50, ejecute Macro2.

Cambie los nombres de las macros y los criterios a su necesidad, y también puede agregar más criterios después de la Caso guión.

2. A continuación, guarde y cierre esta ventana de código, ahora, cuando el valor ingresado esté entre 10 y 50 en la celda A1, se disparará Macro1; si el valor ingresado es mayor que 50, se ejecuta Macro2.


flecha azul burbuja derecha Ejecutar o desencadenar macro si el valor de celda es igual a texto específico con código VBA

Si desea desencadenar la macro basada en texto específico en una celda, por ejemplo, para ejecutar el macro1 si se ingresa el texto "Eliminar", y ejecutar macro2 si se ingresa el texto "Insertar". El siguiente código puede hacerte un favor.

1. Haga clic con el botón derecho en la hoja en la que desea ejecutar la macro en función del valor de la celda, y luego elija Ver código desde el menú contextual, y en el menú abierto Microsoft Visual Basic para aplicaciones ventana, copie y pegue el siguiente código en el Módulo en blanco:

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

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 

doc run macro basado en el valor de celda 2

Nota: En el código anterior, "Borrar"Y"recuadro"Son los textos de la celda en los que desea ejecutar macros, y Macro1 y Macro2 son las macros que quieres ejecutar en base al texto. Por favor, cámbielos a su necesidad.

2. A continuación, guarde este código y cierre la ventana, ahora, cuando ingrese el texto "Eliminar" en la celda A1, se desencadena macro1; si se ingresa el texto "Insertar", se ejecutará macro2.


Artículos relacionados:

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

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

¿Cómo se ejecuta la macro según el valor seleccionado de la lista desplegable en Excel?

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

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


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper 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 de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Mani Chandran · 1 years ago
    I am working with result analysis. In this case, the data in the excel will be like this Name, Sub name , Crade. Now,i want to find the all pass or successful candidate numbers from the result. How can i get it. Because, i am having 6 different subject and their results in single excel sheet. If student failed in one subject he is not be a successful student. How do remove their name in all the subjects.
  • To post as a guest, your comment is unpublished.
    Siva · 1 years ago
    Requirement:
    Based on the selection
    There will be a dropdown list for following three properties of the same dimension as below.
    And there will be three derived cells which will be derived from the cells (G46,G47 and G48)

    Scenario:
    If I select a value from cost center drop down list , cost center derived cell(K46) should be populated with value selected from cost center drop down list(H46) and the other two derived cells (K47 and k48) should become blank.

    Similarly if I select value from Budget manager drop down list, Budget manager derived cell should be populated with value selected from Budget manager drop down list(H47) and the other two derived cells (K45 and k48) should become blank.
  • To post as a guest, your comment is unpublished.
    Richard · 2 years ago
    Hi, how about if you want to run a macro based on two cells? One cell being text based and the other cell having numerical values? Then you would want to call a macro if the two cells show exactly what you want, like "YES" for the first cell and 1 for the second cell, if not a pop box would show saying "Not Found".