Consejos Rápidos

Cómo contar el número de celdas por su color, en tu archivo de Excel [CR]

Tenemos un sinfín de situaciones en nuestros trabajos diarios, necesidades que surgen en nuestro negocio de la noche a la mañana y ya no sabes qué traerá el siguiente día. Incluso puedes encontrarte que, por alguna razón, es necesario poder contar el número de celdas por su color.

Imagina que tienes un archivo parecido al que te muestro en la imagen:

Cómo contar celdas por su color

Como ves, no siempre es posible simplemente usar un valor escrito directamente en la celda o en las de su alrededor. Entonces ¿Cómo hacerlo?

Contar el número de celdas por su color, en tres pasos.

Este es un consejo rápido, así que voy a mostrarte directamente cómo conseguir esta funcionalidad, usando macros, en tres pasos:

  1. Crea una nueva macro en tu libro de trabajo. Si no recuerdas cómo era, refresca tu memoria haciendo clic aquí.
  2. Ya que estés dentro del editor de VBA, inserta un nuevo módulo. Recuerda que es necesario tener organizado nuestro código desde el principio. Haz clic aquí si quieres ver cómo se hace.
  3. Una vez que ya tengas tu nuevo módulo, sólo copia y pega este código que te dejo a continuación:
    
    						Function ContarPorColor(rango_datos As range, condicion_color As range) As Long
    Dim datox As range
    Dim colorx As Long
    colorx = condicion_color.Interior.ColorIndex
    For Each datox In rango_datos
    If datox.Interior.ColorIndex = colorx Then
    ContarPorColor = ContarPorColor + 1
    End If
    Next datox
    End Function

Cómo contar celdas por su color

Cómo contar celdas por su color

¡Y ya está!

Ahora sólo debes cerrar el editor de VBA y regresar a tu archivo. Seguramente ya quieres probar tu flamante función y es eso lo que vamos a hacer ahora.

En la celda que tú quieras, escribe la función: ContarPorColor(C2:C10, C2)

Donde el rango C2:C10 es el que contiene las celdas donde quiero contar por color. Tú deberías poner el rango que necesitas contar.

Por otro lado, C2, es la celda que tiene el color que me interesa contar. Por ejemplo, en este caso yo quiero contar cuántas celdas rojas hay en mi rango C2:C10.

El resultado será el siguiente (en mi caso):

Cómo contar celdas por su color

Cómo contar celdas por su color

¿Quieres descargar el ejemplo terminado?

[sociallocker id=”5276″]Haz clic aquí para descargar el archivo.[/sociallocker]

Hemos terminado.

Y eso es todo, ahora simplemente debes usar la función ContarPorColor y pasarle los argumentos necesarios para que VBA haga el trabajo por ti. Verás cómo te ahorras horas de trabajo y dolores de cabeza con esta simple función.

¡Nos vemos!

12 thoughts on “Cómo contar el número de celdas por su color, en tu archivo de Excel [CR]”

  1. Hola Raymundo, gracias por ayuda. El problema que tengo es que no me reconoce valor, en tu caso c2. No hay manera. Que hago

  2. amigo, como guardo la planilla de excel en conjunto con el formato de VB? cuando cierro Excel, se me pierde la configuracion de VB y debo hacer tooooodo de nuevo :c

    1. Hola, ¿cómo vas?

      Pues si estás usando Excel 2007 o superior, tienes que especificar que el archivo estará habilitado para macros. Al guardar, justo cuando te pide que le pongas un nombre, en el tipo de archivo debes seleccionar “libro habilitado para macros”. Si no lo haces, Excel siempre eliminará las macros porque estás guardándolo como libro “sin macros”.

      Saludos

  3. Hola.! me sirvio mucho esto, solo tengo una pregunta, como hago para que cuando una celda que tengo de un color y cambie de color, me haga el cambio en el conteo.?

    1. Hola Pablo.

      Puedes insertarle al código la siguiente línea para que refresque la fórmula. Donde está el número uno, puedes ponerle el nombre o el número de tu hoja, si es que tienes más de una.

      Worksheet(1).Calculate

      Saludos

  4. Hola Raymundo. Dehame agradecerte por crear este excelente espacio y compartir tus conocimientos. Aprovechando, al igual que otro usuario quiero que la macro haga el conteo cuando cambio de color, en la respuesta mencionas que agregando la linea:

    Worksheet(1).Calculate

    Pero no se donde ponerla dentro de la fórmula, lo he intentado y no doy una, me puedes guiar para saber como introducirla por fa.

    De ante mano muchas gracias.

  5. Hola! La fórmula me funcionó al principio pero una vez que cerré excel y guardé (sin habilitar macros pues no lo sabía) cuando volvi a entrar me tocó hacerlo de nuevo pero ahora me sale como resultado de la fórmula (=ContarPorColor(F7:F1322, D1332)) #¡VALOR!…. he borrado he intentado hacerlo en un nuevo libro y nada…. please ayuda!

Leave a Comment

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *