Tag Archives: SOMASE

Excel – SOMASE (Só some se eu quiser!)

Eu ia publicar outro vídeo, que acabou gerando este. Espero mesmo que seja de muita utilidade para você que assiste pequenino canal.

Acesse também

BLOG ► https://www.tomasvasquez.com.br/blog/
FÓRUM ► https://www.tomasvasquez.com.br/forum/
CURSO ONLINE DE C# ► https://www.tomasvasquez.com.br/cursocsharp

Aqui também!

FACEBOOK ► https://www.facebook.com/tomasvaquezsites
TWITTER ► https://twitter.com/tomamais
GOOGLE+ ► https://plus.google.com/+TomasvasquezBr/

Roteiro, apresentação, edição, etc, etc ► eu mesmo 🙂

Video – Criando uma Macro que faz o SOMASE por cores

Navegando na internet, mais precisamente no Youtube, encontrei o vídeo do camarada jiejen que mostra como fazer passo a passo uma macro que faz exatamente o que a fundação SOMASE do Excel faz, porém com critérios baseados na cor da célula. Sem mais delongas, é só acompanhar o vídeo:

Para quem quiser a macro direto, aí vai:

Function SumColor(Color As Range, Range As Range) As Long
 
Dim Cell As Range
Dim ColorIndexNumber As Integer
Dim ColorSum
 
'Get the Color Index
ColorIndexNumber = Color.Interior.ColorIndex
 
'For each cell we highlighted
For Each Cell In Range
    If Cell.Interior.ColorIndex = ColorIndexNumber Then
        ColorSum = WorksheetFunction.Sum(Cell.Value) + ColorSum
    End If
Next Cell
 
    SumColor = ColorSum
 
End Function

Bom proveito!