Macros en Excel

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

Raymundo Ycaza
#Consejos R谩pidos#Macros (VBA)#Presentaci贸n#馃 Automatizaci贸n con Excel

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: [codigo]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[/codigo]

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!

鈫 Regresar al Blog