Contar Células na Planilha de Excel pela Cor

Por Edivaldo | 02/05/2018 | 129 leituras

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.

Gostar√≠amos de saber se ficou alguma d√ļvida sobre: Contar C√©lulas na Planilha de Excel pela Cor. Por favor deixe seu coment√°rio, ou fa√ßa sua pergunta.

Você deve estar Logado para postar comentários, ou crie um registro em Tudo Excel.