VBA Worksheet 'SelectionChange' not working

[usnapoleon]

Hello
I have this range of cells that I am working with and I've created modules to calculate the sum within certain text colors. That part works. However if I change the color of cells the sums do not automatically recalculate. I have to go to the formula, 'edit' and hit enter to force a recalculation. I was watching a video to create a VBA that would cause it to automatically recalculate but it's not working.

Here is the range of data:

Plat CC REC- 10 OCT JB.xlsm
	E	F
5
6
7	Amount	Transaction
8
9
241
242	50	S
243	50	S
244	50	S
245	50	S
246	143	S
247	143	S
248	143	S
249	49	S
250	50	S
251	143	S
252	50	S
253	50	S
254	49	S
255	143	S
256	143	S
257	143	S
258	143	S
259	1592
260
261		0
262
263		Sum Colors
264		963
265		0
266
OL Activity

Cell Formulas
Range	Formula
F261	F261	=SUMIF(E248:E259,"Indigo",E247:E259)
F264:F265	F264	=SumColor(E264,E248:E259)

Here is the programming:

Supposedly all I need to do is change the color (column E), and then click outside the cell anywhere on columns A-G and it will cause the recalculation. But its not doing that.

Any help one can give on this? I was watching a tutorial video and I mirrored the process so I'm not sure what is wrong.

Thank you!

 

[usnapoleon]

Oh, ignore F261... I was messing around, thats not a working formula, I forgot to delete it.

 

[Fluff]

What is the code to get the sum?

 

[RoryA]

Did you make SumColor volatile?

 

[usnapoleon]

As I understood from a lot of searching on Google, there was not a feature existing in Excel 365 that naturally sums up numbers based on color, so I initially created this VBA Module to define SumColor

From there, the excel sheet formula is presented in the original message above in F264

 

[MARK858]

As Rory has stated it needs to be volatile
Try putting the code

Application.Volatile

after the Dim statements

 

[usnapoleon]

As Rory has stated it needs to be volatile
Try putting the code

Application.Volatile

after the Dim statements

That worked!!! Yay!!! Thank you! Sorry for not understanding initially and requiring the exact input to be shown to me...

I am not an Excel expert by any means but I am definitely above average. However, when it comes to VBA ... I'm a total noob. Some parts are familiar to me, such as the if/then statements from when I was working on .lua's, but it's still all Greek. I appreciate you guys. However you got to be as good as you are, it is a blessing to people like myself. Thank you!