Cómo Contar Celdas con Color en Excel

スポンサーリンク
スポンサーリンク

Cómo Contar Celdas con Color en Excel

En Excel, puedes contar celdas con colores aplicados manualmente o mediante formato condicional. Dado que esto no se puede hacer directamente con las funciones estándar, este artículo también explica cómo contar celdas específicas con color usando VBA.

Método 1: Contar Celdas con Color Usando la Función de Filtro

Usando la función de filtro de Excel, puedes filtrar y mostrar las celdas con color para contarlas.

Pasos

  1. Selecciona el rango de celdas que contiene colores (por ejemplo, A2:A20).
  2. Haz clic en la pestaña “Datos” y habilita la función de filtro haciendo clic en “Filtro”.
  3. Abre el menú de filtro, selecciona “Filtrar por Color” y especifica el color que deseas contar.
  4. Revisa el número de celdas mostradas.

Nota

Al contar usando la función de filtro, puedes confirmar visualmente las celdas del color especificado, pero necesitas contar manualmente las filas mostradas, ya que no se calculan automáticamente.

Método 2: Contar Celdas Específicas con Color Usando Macros VBA

Para contar solo celdas específicas con color, puedes obtener fácilmente los resultados usando una macro VBA.

Código VBA

  1. Haz clic en la pestaña “Desarrollador” y abre el editor VBA haciendo clic en “Visual Basic”.
  2. Selecciona “Insertar” → “Módulo” y pega el siguiente código:

Código VBA:

Function ContarCeldasColor(rango As Range, celdaColor As Range) As Long
    Dim celda As Range
    Dim conteo As Long
    conteo = 0
    
    For Each celda In rango
        If celda.Interior.Color = celdaColor.Interior.Color Then
            conteo = conteo + 1
        End If
    Next celda
    
    ContarCeldasColor = conteo
End Function

Explicación del Código VBA

  • rango As Range: Especifica el rango de celdas a contar.
  • celdaColor As Range: Especifica la celda con el color que deseas contar.
  • ContarCeldasColor = conteo: Devuelve el número de celdas en el rango que coinciden con el color especificado.

Cómo Usar

  1. Cierra el editor VBA y regresa a la hoja de Excel.
  2. Si el rango A2:A20 contiene celdas con color, ingresa la siguiente fórmula en una celda (por ejemplo, B2) para mostrar el resultado del conteo:

=ContarCeldasColor(A2:A20, A1)

Aquí, establece el color deseado en la celda A1 (rellena A1 con el color objetivo), y solo las celdas con ese color serán contadas.

Ejemplo

En la tabla a continuación, la columna A contiene celdas con color, y la columna B muestra los resultados del conteo. La celda A1 está configurada con el color objetivo.

El conteo de celdas en A2 a A10 que tienen el color de A1 se mostrará.

A B
1 Color Objetivo Número de Celdas con Color
2 Dato 1 =ContarCeldasColor(A2:A10, A1)
3 Dato 2
4 Dato 3
5 Dato 4
6 Dato 5

Resultado

  • La celda B2 mostrará el número de celdas en el rango A2:A10 que coinciden con el color de A1. En este ejemplo, se mostrará “3”.