Help Required to color Interior if the Goal value is lesser than the Actual

[xlhelp15]

[TABLE="class: grid, width: 500, align: center"]
<tbody>[TR]
[TD]Goal

[/TD]
[TD]07/02/18
[/TD]
[TD]07/03/18
[/TD]
[TD]07/04/18
[/TD]
[TD]07/05/18
[/TD]
[/TR]
[TR]
[TD]50
[/TD]
[TD]20

[/TD]
[TD]56
[/TD]
[TD]65
[/TD]
[TD]130
[/TD]
[/TR]
[TR]
[TD]50
[/TD]
[TD]22

[/TD]
[TD]25
[/TD]
[TD]35
[/TD]
[TD]85
[/TD]
[/TR]
[TR]
[TD]106
[/TD]
[TD]130
[/TD]
[TD]120
[/TD]
[TD]85
[/TD]
[TD]99
[/TD]
[/TR]
[TR]
[TD]120
[/TD]
[TD]115
[/TD]
[TD]160
[/TD]
[TD]55
[/TD]
[TD]96
[/TD]
[/TR]
[TR]
[TD]150
[/TD]
[TD]16
[/TD]
[TD]175
[/TD]
[TD]199
[/TD]
[TD]12
[/TD]
[/TR]
</tbody>[/TABLE]

Hi - I need a macro which needs to fill the colorindex=22 whenever the ACTUAL is lesser than the GOAL.

For eg,

in row 2 - date -07/2,03 & 04 is lesser than the goal. It needs to highlights interior color= 22.

 

[WassimN]

Hi xlhelp15,

You do not NEED VBA for this, you can get the results you need by using Conditional Formatting. It maybe easer to maintain and faster than VBA. The Conditional Formatting is on the Home Ribbon in the Style section

 

[xlhelp15]

I have tried the same way earlier, but my data range is huge. it has minimum 30000 rows to apply conditional formatting. could you please help me with the vba ?

 

[Fluff]

I would also recommend CF rather than VBA.
If your data starts in A1 (row 1) being a header.
Simply select B2 to the end of your data & use this formula
=B2<$A2
This will then work over your entire data set