Cómo Obtener El color de la celda utilizando VBA en Microsoft Excel 2010
En este artículo, aprenderá cómo obtener el color de la celda usando el código VBA.
Necesitamos seguir los pasos a continuación para iniciar el editor de VB.
Haga clic en la pestaña Desarrollador. Desde el grupo Código, seleccione Visual Basic
Haga clic en Insertar y luego en Módulo
Esto creará un nuevo módulo.
Ingrese el siguiente código en el Módulo
Función ColorIndex (CellColor como rango)
ColorIndex = CellColor.Interior.ColorIndex
Función de fin
Para obtener el color de las siguientes celdas, consulte la siguiente instantánea
En la celda B2, ingrese la fórmula como = ColorIndex (A2) y luego copie la fórmula en las celdas siguientes.
[.underline] # Tomemos un ejemplo más: # Para saber cuántas veces se ha repetido un color en particular (contar por color), consulte la siguiente instantánea
Podemos usar la función COUNTIF junto con la función UDFColorIndex recién creada.
===
CONTAR.SI: cuenta el número de celdas dentro de un rango que cumple la condición.
Sintaxis: = CONTAR.SI (rango, criterio)
rango: Se refiere al rango de celdas seleccionadas a partir del cual el criterio comprobará la cantidad de elementos que se han encontrado.
Criterios: Los criterios definen qué celdas contar.
En la celda D2, la fórmula sería = CONTAR.SI ($ B $ 2: $ B $ 9, ColorIndex (D2))
Al copiar la fórmula en la celda E2, obtendremos el recuento por colores.
Así es como podemos obtener el color de cualquier celda.