Saltar al contenido principal

¿Cómo contar / sumar celdas por colores con formato condicional en Excel?

En Excel, puede colorear algunas celdas usando formato condicional. Ahora, este tutorial le dirá algunos métodos prácticos y fáciles para contar o sumar rápidamente las celdas por color con formato condicional en Excel.

Cuente celdas por color de fuente y fondo por VBA

Contar / sumar celdas por color de fuente con formato condicional de Kutools para Excel buena idea3      PLAY

Contar / sumar celdas por color de fondo con formato condicional de Kutools para Excel buena idea3      PLAY


flecha azul burbuja derecha Contar celdas por fuente y color de fondo por VBA

En Excel, solo el código VBA puede contar rápidamente las celdas según una fuente y un color de fondo específicos.

1. Prensa Alt + F11 llaves para abrir Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic en recuadro > Módulo y copie y pegue debajo del código VBA en la ventana emergente Módulo ventana.

VBA: cuente las celdas según una fuente y un color de fondo.

Sub DisplayFormatCount()
	'Updateby20150305
	Dim Rng As Range
	Dim CountRange As Range
	Dim ColorRange As Range
	Dim xBackColor As Long
	Dim xFontColor As Long
	On Error Resume Next
	xTitleId       = "KutoolsforExcel"
	Set CountRange = Application.Selection
	Set CountRange = Application.InputBox("Count Range :", xTitleId, CountRange.Address, Type: = 8)
	Set ColorRange = Application.InputBox("Color Range(single cell):", xTitleId, Type: = 8)
	Set ColorRange = ColorRange.Range("A1")
	xReturn        = 0
	For Each Rng In CountRange
		qqq           = Rng.Value
		xxx           = Rng.DisplayFormat.Interior.Color
		If Rng.DisplayFormat.Interior.Color = ColorRange.DisplayFormat.Interior.Color Then
			xBackColor   = xBackColor + 1
		End If
		If Rng.DisplayFormat.Font.Color = ColorRange.DisplayFormat.Font.Color Then
			xFontColor = xFontColor + 1
		End If
	Next
	MsgBox "BackColor is " & xBackColor & Chr(10) & "FontColor is " & xFontColor
End Sub

3. Hacer clic en Ejecutar botón o prensa F5 para ejecutar el código, luego seleccione el rango que necesita en el cuadro de diálogo emergente. Ver captura de pantalla:
doc-recuento-por-color-condicional-1

4. Hacer clic en OK, luego seleccione una celda en cuya fuente y color de fondo desee contar las celdas. Ver captura de pantalla:

doc-recuento-por-color-condicional-2

5. Hacer clic en OK. Luego, aparece un cuadro de diálogo para indicarle cuántas celdas tienen el mismo color de fondo y color de fuente con la celda seleccionada en el rango.

doc-recuento-por-color-condicional-3


flecha azul burbuja derecha Contar / sumar celdas por color de fuente con formato condicional de Kutools para Excel

En Excel, no puede contar o sumar las celdas por color de fuente solo con formato condicional. Sin embargo, hay un complemento útil llamado Kutools for Excel que puede ayudarlo a resolver rápidamente este problema con su Contar por color .

Kutools for Excel, con más de 300 funciones prácticas, facilita su trabajo. 

Después instalación gratuita Kutools para Excel, haga lo siguiente:

1. Seleccione un rango que desee contar o sume las celdas por color de fuente con formato condicional, luego haga clic en Kutools Más> Contar por color. Ver captura de pantalla:

doc-recuento-por-color-condicional-4

2. Luego, en el Contar por color diálogo, seleccionar Formato condicional bajo Método de color lista y Fuente bajo Tipo de color lista. Luego, puede ver el resultado del recuento y la suma en el cuadro de diálogo. Ver captura de pantalla:

doc-recuento-por-color-condicional-5

Note: Si desea generar el resultado del cálculo como un informe, puede hacer clic en Generar informe in el Contar por color cuadro de diálogo, se creará un informe en un nuevo libro de trabajo. Ver captura de pantalla:

doc-recuento-por-color-condicional-6      doc-recuento-por-color-condicional-7


Contar / sumar celdas por color de fondo con formato condicional de Kutools para Excel

Si desea contar o sumar celdas por color de fondo con formato condicional, también puede aplicar Contar por color utilidad de Kutools for Excel.

1. Seleccione un rango que desee contar o sumar celdas por color de fondo con formato condicional, luego haga clic en Kutools Más > Contar por color.

Después instalación gratuita Kutools para Excel, haga lo siguiente:

2. Luego, en el Contar por color diálogo, seleccionar Formato condicional bajo Método de color lista y Antecedentes bajo Tipo de color lista. Luego, puede ver el resultado del recuento y la suma en el cuadro de diálogo. Ver captura de pantalla:

doc-recuento-por-color-condicional-8

Note: Si desea generar el resultado del cálculo como un informe, puede hacer clic en Generar informe existentes Contar por color cuadro de diálogo, se creará un informe en un nuevo libro de trabajo. Ver captura de pantalla:

doc-recuento-por-color-condicional-9

Haga clic aquí para obtener más información sobre Count by Color.

Propina.Con Contar por color utilidad, también puede contar/sumar/promediar las celdas por color de fondo o color de fuente solo con formato estándar o con formato estándar y condicional. Si deseas aplicar Count by Color sin limitación en 30 días, descargue y obtenga una prueba gratuita ahora.


flecha azul burbuja derecha Calcular celdas por color de fuente o color de fondo


Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo.  Haga clic aquí para obtener la función que más necesita...

Descripción


Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
Comments (7)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi,

This is a great piece of VBA and works perfectly. Are you able to modify this code to make it a function and then be used as a formula?

e.g.
=DisplayFormatCount(A14:E14,A2,False) for counting background colour (Count Range, Colour Match Cell, type)

=DisplayFormatCount(C29:D29,A2,True) for counting font colour

I would like to you something like this for an input form of many tables and validation fields that are compulsory. I would then be able to count how many fields that have not been completed correctly.


Cheers
This comment was minimized by the moderator on the site
Could you please teach me VBA codes I would like to learn VBA using excel sheet
This comment was minimized by the moderator on the site
Chào bạn.

VBA đếm ô màu rất hay, tuy nhiên bạn có thể sửa giúp mình để kết quả không hiện thành msg box mà hiện luôn trên ô excel chỉ định được không? thêm cả hàm sum, average nữa thì càng tốt :D . Mail của mình là . Mình cám ơn.
This comment was minimized by the moderator on the site
Hi,
How do I modified the code for the cell contain conditional formatting? Because it count the background as "blank".


Thanks.
This comment was minimized by the moderator on the site
Sorry I have no idea about the VBA code.
This comment was minimized by the moderator on the site
May I congratulate you on a most easily understood and well written VBA program to perform such a simple task - i.e., count the number of cells with a specific color derived from Conditional Formatting. It beats the pants of the monster program by Pearson, and his does not even work, at least in Excel 2013. Nor do other supposed counting programs work that I have tried. Yours is the only one!! This worked perfectly. Thank you, thank you, thank you. Best Holiday Wishes, Mort in Dallas
This comment was minimized by the moderator on the site
hi


kindly send the above VBA code same code is I need please help.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations