optellen van getallen in cellen met een bepaalde opmaak
Nelly Kruining
een gele opvulling en een aantal cellen heeft een rode opvulling. Is er een
functie die de getallen met b.v. alleen gele opvulling bij elkaar optelt?
Bret Bernever
NellyK...@discussions.microsoft.com says...
> Ik heb een bereik met cellen waarin getallen staan. Een aantal cellen heeft
> een gele opvulling en een aantal cellen heeft een rode opvulling. Is er een
> functie die de getallen met b.v. alleen gele opvulling bij elkaar optelt?
Kijk, zoiets verzin ik niet zelf. Even Googlen doet wonderen:
Druk Alt+F11, kies Invoegen->Module, plak onderstaande code:
************************************************************
Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As
Boolean)
Dim rCell As Range
Dim lCol As Long
Dim vResult
lCol = rColor.Interior.ColorIndex
If SUM = True Then
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = WorksheetFunction.SUM(rCell, vResult)
End If
Next rCell
Else
For Each rCell In rRange
If rCell.Interior.ColorIndex = lCol Then
vResult = 1 + vResult
End If
Next rCell
End If
ColorFunction = vResult
End Function
*************************************************************
Gebruiken:
=ColorFunction($C$1,$A$1:$A$12,TRUE) om de SOM te bepalen van de waarden
van het bereik $A$1:$A$12 die dezelfde opvulkleur hebben als cel $C$1.
Gebruik de waarde WAAR als laatste argument om op te tellen.
Bret Bernever
bretbe...@yahoo.com says...
> =ColorFunction($C$1,$A$1:$A$12,TRUE)
Punt Komma gebruiken ipv komma. Dus:
=ColorFunction($C$1;$A$1:$A$12;TRUE)
Kruining@discussions.microsoft.com Nelly Kruining
werkt als een tierelier, alleen moet bij de Nederlandse Excel WAAR ipv TRUE
in de formulebalk worden gezet.
"Bret Bernever" wrote:
> .
>