VBA compare two column values in row range

[Pinaceous]

Good Day,

I want to create a VBA code that compares two column totals.

Column D and the sum of Columns (AC,AD,AE) within row range of 6 - 36.

Where if these columns are different, (the left column D and the sum of columns AC, AD & AE) an interior color cell of yellow will appear in them until they are of the same value; where next the yellow interior color cell will go away when their values are equal.

For example:

After the correct entry has been entered &/or they become equal, for example in AE12 if I add the value of 180 the interior colored yellow cells will return back to its original interior cell.

If you think that Conditional Fomatting might be better, please let me know.

Thank you!
pinaceous

 

[DanteAmor]

If you think that Conditional Fomatting might be better

Try:

Dante Amor
	A	B	C	D	E	F	G																					AB	AC	AD	AE
1
5
6				10120																									8466	1654	0
7				9																									3	3	2
8				8																									4	4	0
9				7																									1	1	6
10				9146																									6950	2029	167
11
12				9548																									7693	1675	0
13
Hoja4

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
D6:D36,AC6:AE36	Expression	=AND($D6<>"",$D6<>SUM($AC6:$AE6))	text	NO

Note: Applies to: =$D$6:$D$36,$AC$6:$AE$36

 

[Peter_SSs]

Shouldn't need the check that col D is not blank?
Edit: I think that the check that col D is not blank should definitely not be included, otherwise row 11 below would not get highlighted.

23 01 10.xlsm
	D	E	F	G																					AB	AC	AD	AE
6	10120																									8466	1654	0
7	9																									3	3	2
8	8																									4	4	0
9	7																									1	1	6
10	9146																									6950	2029	167
11																										6	5
12	9548																									7693	1675	0
13
CF

Cells with Conditional Formatting
Cell	Condition		Cell Format	Stop If True
D6:D36,AC6:AE36	Expression	=$D6<>SUM($AC6:$AE6)	text	NO

 

[DanteAmor]

I think that the check that col D is not blank should definitely not be included, otherwise row 11 below would not get highlighted.

You're right, I don't know why one of my tests, the sum returned 0, so "" <> 0, and it was highlighting the cells, that's why I put the validation.
Thanks Peter.
Peter's formula is correct:

=$D6<>SUM($AC6:$AE6)

 

[Pinaceous]

Thanks guys! Lot to work out here on my end. Thanks again so much!

 

[Peter_SSs]

You're welcome. Glad we could help.

 

[Pinaceous]

Hi Guys!

BTW, is there any way I can copy this Conditional Formatting Rule onto other sheets?

For example, in using the Conditional Formatting Rules Manager or by some other means?

The only way that I can think of is to go to each worksheet within the workbook and then creating this rule there.


Please let me know.

Thank you!
pinaceous