Contar Células na Planilha de Excel pela Cor

Formatar uma planilha de Excel facilita na revisão e na visualização de relatórios, tanto impressos, como na tela do computador. Nesta postagem vamos aprender como contar as células pela cor. Isso pode servir, para você definir parâmetros destacados de dados que representa cada cor separada.

Apesar de não usarmos a função CONT.SE, ainda podemos obter os resultados com o uso do VBA. Com o VBA, podemos criar a função definida pelo usuário e salvar no arquivo para que ele possa ser usado para cada pasta de trabalho e de outro computador.

A cor de preenchimento de uma célula é amplamente usada pelos usuários do Excel porque, destacando-a com uma cor diferente, podemos identificá-la facilmente na tela.

Às vezes, a cor significa que os dados pertencem a uma categoria específica, ou talvez algum status, ou alguma ação, que devemos tomar como base nessa cor. O ponto é que quando temos várias células com uma cor de preenchimento, é quase inevitável que chegue a hora em que precisamos contá-las por cor.

Como contar as células por cores?

Para começar você precisa saber um pouquinho do código VBA e ter a guia DESENVOLVEDOR habilitada no seu Excel. Se sim, faça o teste!

  • Abra uma nova planilha de Excel.
  • Vá para a faixa de opções Desenvolvedor.
  • No grupo Código, clique em Visual Basic.
  • Com a janela de VBA aberta clique em Inserir --> Módulo.
  • Copie o código a seguir e cole na tela do VBA.
Function CONTACOR(celulaOrigen As range, intervalo As range)
 
 Application.Volatile
 
 'Variables
 Dim celula As range
 
 'Recorremos todas as celulas do intervalo
 For Each celula In intervalo
 
 'Compara a propiedad Interior.Color
 If celula.Interior.Color = celulaOrigen.Interior.Color Then
 CONTACOR = CONTACOR + 1
 End If
 
 Next celula
 
End Function

Neste exemplo, CONTACOR é a função criada, para ser adicionada na contagem das células. Você pode alterar o termo CONTACOR, por qualquer outro, mas lembre-se de alterar em todas as linhas do código, ou não irá funcionar.

  • Feche a tela do Visual Basic Application.
  • Vá para a planilha, que acabou de criar para testes e digite a fórmula:

Nota: se você seguiu o exemplo, conforme a imagem a seguir, o intervalo de cores está em B2 até B11.

Adicione uma das cores em D1 e na célula D2 digite:

=CONTACOR(D1;B2:B11)

Se você pintou as células com as mesmas cores da imagem acima, o resultado será 6, para a cor amarela.

Importante: como é uma função definida pelo usuário, sempre que fizer alguma alteração na cor de uma, ou mais células, a fórmula deve ser atualizada, para que as alterações tenham efeito na contagem.


24 Comments

  1. Danilo 02/04/2020
    • Edivaldo 04/04/2020
  2. Daline 27/08/2019
    • Edivaldo 27/08/2019
  3. Eliana Reginaldo 01/07/2019
    • Edivaldo 03/07/2019
  4. Hélio Dias Durval 16/04/2019
  5. Alan Cristo 29/03/2019
    • Edivaldo 30/03/2019
  6. Tarsila 27/03/2019
    • Edivaldo 27/03/2019
  7. Eurico 14/03/2019
    • Edivaldo 14/03/2019
      • Eurico 14/03/2019
        • Edivaldo 14/03/2019
          • Eurico 15/03/2019
  8. FRANCISCO FILHO 05/03/2019
    • Edivaldo 05/03/2019
  9. Rodrigo Barros 04/12/2018
    • Edivaldo 05/12/2018
  10. Emanuel Muniz 23/11/2018
    • Emanuel Muniz 23/11/2018
    • Edivaldo 25/11/2018

Leave a Reply