VBA function not auto updating

[Saitej1234]

I have written a function in vba for sum based on cell interior colour.
But when i fill colour to another cell in the selected range then sum is not auto updating.
When i click on sum colour cell then it is updating.
Please help to auto update the sum when i add color to cell in given range.

 

[Hui]

If you are only applying it to a small range you could try the example to monitor cell colors described here

Capturing cell color change in VBA

Is there a way to capture a cell color change within an event in VBA? I've tried the worksheet change event, but when just changing the background color it doesn't trigger the event. Is there another event that would do this? Thanks in advance!

www.mrexcel.com

 

[Saitej1234]

>>> use code - tags <<<

Function sumcolor(cellcolor as range, rRange as range)
Dim csum as double
Dim colindex as integer
Colindex= cellcolor.interior.colorindex
For each cl in rRange
If cl.interior.colorindex=colindex then
Csum= worksheetfunction.sum(cl,csum)
End if
Next cl
Sumcolor= csum
End function

This is the code i have witten