Contar celdas por color interior usando VBA - Consejos de Excel

Tabla de contenido

Emily pregunta:

Por favor, podría recomendar la solución de formulario para contar el número de celdas que tienen un color de fondo particular (es decir, estas celdas contienen algunos datos, sin embargo, el color es lo importante para contarlos).

Lógicamente, creo que debería seguir un formulario estándar, es decir

CountIF(A01:A55,"backgroundcolour=red")

Creo que el color rojo debe identificarse con el número 3 (según el archivo de ayuda)

Necesito saber cómo codificar el color de fondo de la celda, es decir, colorfill ?, backgroundcolour ?, interior.color?… ???

Emily, si tan solo fuera así de fácil. Debe tener una función definida por el usuario en VBA. A continuación se muestra el código de la función. Debe ingresar esto en un nuevo módulo de código en el libro de trabajo.

Una vez que haya ingresado el código, puede usar esta fórmula:

=CountColor(A1:A99,D2)

Donde D2 tiene el formato de fondo que desea contar.

Aquí está el código:

Function CountColor(Rng As Range, RngColor As Range) As Integer Dim Cll As Range Dim Clr As Long Clr = RngColor.Range("A1").Interior.Color For Each Cll In Rng If Cll.Interior.Color = Clr Then CountColor = CountColor + 1 End If Next Cll End Function

Articulos interesantes...