Tabla de contenido
En Excel, no existe ninguna función para realizar cálculos basados en el color de las celdas. Pero utilizando Microsoft Visual Basic para Aplicaciones (VBA) es posible realizar funciones personalizadas de cálculo basadas en el color de las celdas. En este artículo, te mostraré cómo puedes crear y utilizar la función ColorFunction en Excel.
Supongamos que tenemos un conjunto de datos de los pedidos de productos de una empresa. La columna Cantidad del pedido Los pedidos entregados están coloreados en verde claro y los pedidos en entrega están coloreados en naranja claro. Ahora podemos encontrar el número de clientes que han recibido o no sus pedidos contando las celdas del mismo color. La cantidad total de pedidos entregados o en entrega se puede encontrar sumando las celdas del mismo color.
Descargar el cuaderno de prácticas
Función de color en Excel.xlsmFunción Color en Excel
Primer paso Abrir módulo de macros en la ventana de VBA
En primer lugar, tiene que abrir el VBA pulsando ALT+F11. A continuación, haga clic con el botón derecho del ratón en el nombre de la hoja del panel izquierdo y vaya a Insertar> Módulo
Como resultado, se Módulo se abrirá la caja.
Paso 2 Insertar código VBA para crear ColorFunction
Inserte el código siguiente, en el campo Módulo y cierre la ventana VBA ventana.
Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean) Dim rCell As Range Dim lCol As Long Dim vResult lCol = rColor.Interior.ColorIndex If SUM = True Then For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = WorksheetFunction.SUM(rCell, vResult) End If Next rCell Else For Each rCell In rRange If rCell.Interior.ColorIndex = lCol Then vResult = 1 +vResult End If Next rCell End If ColorFunction = vResult End Function 
Aquí, el código VBA crea una función personalizada denominada ColorFunción que contará las celdas coloreadas si damos el argumento como FALSO y sumará las celdas coloreadas si damos el argumento como VERDADERO.
Paso 3 Guardar el libro de trabajo como libro de trabajo habilitado para macros de Excel
Debe guardar el libro de Excel en .xlsm para guardar su función personalizada. En primer lugar, vaya a Archivo en la esquina superior izquierda de la ventana de Excel.
A continuación, seleccione Guardar como.
A continuación, seleccione Libro de Excel habilitado para macros (*xlsm) y haga clic en Ahorra.
Paso 4 : Uso de ColorFunction para contar celdas coloreadas
Ahora puede utilizar su ColorFunción.
Para obtener el recuento de celdas de color verde claro, escriba la siguiente fórmula en una celda vacía,
=FunciónColor(F5,$D$5:$D$11,FALSE)
Toma, F5 = Criterio celda cuyo color se contará
$D$5:$D$11 = Intervalo para el recuento
FALSO indica que se contará el número de celdas que tengan el mismo color que la celda criterio
Pulse INTRODUCE y obtendrá el recuento de células verde claro.
De forma similar, puede obtener el recuento de células naranja claro.
Paso 5 : Uso de ColorFunction para Sumar Celdas de Color
Para obtener la suma de celdas de color verde claro, escriba la siguiente fórmula en una celda vacía,
=FunciónColor(F5,$D$5:$D$11,TRUE)
Toma, F5 = Celda criterio cuyo color se sumará
$D$5:$D$11 = Rango para la suma
TRUE indica que se sumará el número de celdas que tengan el mismo color que la celda criterio.
obtendrá la suma de celdas verde claro pulsando ENTRAR.
De forma similar, puedes obtener la suma de las celdas de color naranja claro.
Formas alternativas de contar y sumar celdas de colores
En lugar de utilizar ColorFunción, puede obtener el recuento de celdas coloreadas o sumar las celdas coloreadas de dos formas diferentes.
1. Utilización de las funciones FILTRO y SUBTOTAL
Puede obtener el recuento y la suma de las celdas coloreadas utilizando Filtro y la función SUBTOTAL .
En primer lugar, vaya a la página Datos y haga clic en Filtrar.
A continuación, aparecerá una flecha hacia abajo junto al encabezado de cada columna. Haga clic en la flecha hacia abajo junto a la columna Cantidad del pedido (Columna de color), vaya a Filtrar por color y seleccione el color verde claro.
Ahora sólo verá datos de color verde claro en esta columna. Para obtener el recuento escriba la siguiente fórmula,
=SUBTOTAL(2,D5:D11)
Aquí 2 indica que la célula será contada y D5:D11 es el rango de datos.
Tras pulsar INTRODUCE obtendrá el recuento de células de color verde claro.
Para obtener la suma de las celdas coloreadas, escribe la siguiente fórmula,
=SUBTOTAL(9,D5:D11)
Aquí 9 indica que la casilla se sumará y D5:D11 es el intervalo de datos
Tras pulsar INTRODUCE obtendrás la suma de celdas de color verde claro.
Cambiando el filtro a color naranja claro, puede obtener el recuento y la suma de las celdas de color naranja.
2. Uso de la función GET.CELL
Utilizando el GET.CELL también puedes contar y sumar las celdas coloreadas.
En primer lugar, vaya a la página Fórmulas y seleccione Definir nombre.
A Nuevo nombre Escriba un nombre como Color en el Nombre e Inserte la fórmula en Se refiere a y pulse DE ACUERDO.
=GET.CELL(38,'OBTENER CELDA'!$D5)
Aquí 38 indica que la fórmula dará el código de color de la celda referida y ¡'GET CELL'!$D5 es la celda de referencia (la primera celda después de la cabecera de la columna coloreada)
Ahora escriba =Color (Nombre que facilitó anteriormente en el Definir nombres box) en la columna adyacente de su columna de color.
Tras pulsar INTRODUCE y arrastrando la celda E5 al final del conjunto de datos, obtendrá los códigos de color de todas las celdas de color de la columna E .
Ahora escriba la siguiente fórmula para obtener el recuento de celdas de color verde claro
=COUNTIF($E$5:$E$11,50)
Toma, $E$5:$E$11 es el rango para el recuento, y 50 es el código de color verde claro.
Tras pulsar Entre en obtendrá el recuento de celdas de color verde.
Escribe la siguiente fórmula para obtener la suma de las celdas de color verde claro,
=SUMIF(E5:E11,50,D5:D11)
Toma, E5:E11 es el intervalo de criterios, 50 indica el código de color verde claro y D5:D11 es el rango de suma.
Pulse INTRODUCE y obtendrás la suma de todas las celdas de color verde.
De forma similar, puede obtener el recuento y la suma de las celdas de color naranja claro.
Conclusión
Espero que después de leer el artículo ahora puedas crear y utilizar ColorFunction en Excel. Si tienes algún problema, por favor deja un comentario.
