Como criar somas de cores
Você gostaria de adicionar o conteúdo da célula, mas leva em consideração a cor das células? Você pode fazer isso com uma macro. A figura a seguir mostra uma tabela de dados em que algumas células têm um fundo amarelo (cor de preenchimento amarela):
Para adicionar apenas as células da seleção atual que têm uma cor de fundo amarela, use a seguinte macro:
Células Sub AddColor ()
Dim Sum As Long
Dim Cell As Range
Para cada célula na seleção
Se Cell.Interior.ColorIndex = 6 Then
Soma = Soma + Cell.Value
Fim se
Próxima célula
MsgBox "A soma da cor é:" & soma
End Sub
Depois de iniciar a macro, o Excel mostra a soma das células em uma janela, que são destacadas com uma cor de fundo amarela. A figura a seguir mostra a aparência do resultado se você selecionar o intervalo de células apresentado acima:
Para usar outras cores em vez de células com fundo amarelo, ajuste o valor de comparação na consulta If. Substitua o amarelo por outros valores em vez de 6. Para descobrir qual valor para ColorIndex usar para uma cor de sua escolha, você pode usar uma pequena macro. Clique em uma célula de sua escolha e inicie a macro a seguir para descobrir com qual cor de fundo a célula ativa está formatada:
Sub ActiveColor ()
MsgBox "Cor de fundo ativa:" & _
(Seleção (1, 1) .Interior.ColorIndex)
End Sub
Dica: Se você gostaria de saber como inserir e iniciar macros no Excel, você encontrará uma breve descrição aqui: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -makros- in-excel-ein.html
