ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Compare rows to col (https://www.excelbanter.com/excel-programming/345241-compare-rows-col.html)

greu

Compare rows to col
 

I need to compare the row for each store with the target for that store
(and colour the cells in yellow if they are smaller or green if
greater).

Conditional formating helps for few rows, but i have close to 100
stores.

I can record a macro for 1 row, but i need to find a way to
automaticaly do tyhis for all rows.


+-------------------------------------------------------------------+
|Filename: target.zip |
|Download: http://www.excelforum.com/attachment.php?postid=4022 |
+-------------------------------------------------------------------+

--
greu
------------------------------------------------------------------------
greu's Profile: http://www.excelforum.com/member.php...o&userid=28700
View this thread: http://www.excelforum.com/showthread...hreadid=483837


Nigel

Compare rows to col
 
You will need to apply a loop to work through all rows setting up a
condition for each based on the location of the store target.

Something like......exact references will need to change based on your data
location

LastRow = Cells(Rows.Count,1).End(xlup).Row
For xr = 1 to LastRow
With Cells(xr,2)
.FormatConditions.Delete
.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreaterEqual,
Formula1:="=$D$" & xr
.FormatConditions(1).Interior.ColorIndex = 4
.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess,
Formula1:="=$D$" & xr
.FormatConditions(2).Interior.ColorIndex = 6
End With
Next xr


--
Cheers
Nigel



"greu" wrote in message
...

I need to compare the row for each store with the target for that store
(and colour the cells in yellow if they are smaller or green if
greater).

Conditional formating helps for few rows, but i have close to 100
stores.

I can record a macro for 1 row, but i need to find a way to
automaticaly do tyhis for all rows.


+-------------------------------------------------------------------+
|Filename: target.zip |
|Download: http://www.excelforum.com/attachment.php?postid=4022 |
+-------------------------------------------------------------------+

--
greu
------------------------------------------------------------------------
greu's Profile:

http://www.excelforum.com/member.php...o&userid=28700
View this thread: http://www.excelforum.com/showthread...hreadid=483837




greu[_2_]

Compare rows to col
 

This macro colors Column B;

i need to color each cell based on a comparaison with the target o
column B


i need to color each cell in the ranges :
C4:H4
C5:H5
...
C9:H9

If i get a macro that works on the file i attached, i will adapt it t
my requirement

--
gre
-----------------------------------------------------------------------
greu's Profile: http://www.excelforum.com/member.php...fo&userid=2870
View this thread: http://www.excelforum.com/showthread.php?threadid=48383


greu[_3_]

Compare rows to col
 

i managed to modify a little to ure code, and it seams to work like a
charm

Here is my code:

LastRow = Cells(Rows.Count, 1).End(xlUp).Row
For xr = 1 To LastRow
For col = 3 To 31
With Cells(xr, col)
..FormatConditions.Delete
..FormatConditions.Add Type:=xlCellValue,
Operator:=xlGreaterEqual, Formula1:="=$B$" & xr
..FormatConditions(1).Interior.ColorIndex = 4
..FormatConditions.Add Type:=xlCellValue, Operator:=xlLess,
Formula1:="=$B$" & xr
..FormatConditions(2).Interior.ColorIndex = 6
End With
Next col
Next xr

Thx a lot :)


--
greu
------------------------------------------------------------------------
greu's Profile: http://www.excelforum.com/member.php...o&userid=28700
View this thread: http://www.excelforum.com/showthread...hreadid=483837


Nigel

Compare rows to col
 
As I said you will need to change the references based on your data set up.
The following code will do it, but you could do it manually for ALL rows at
once by selecting all store rows range C4:H104 (say) then setting the
conditional value formula to ="$B4", this will change to B5....B104 as it
ripples down the sheet. Note if you choose B4 when setting the formula
reference it is entered as $B$4 , remove the 2nd absolute ($) reference.


Sub SetConditions()
Dim LastRow As Long, xr As Long
LastRow = Cells(Rows.Count, 1).End(xlUp).Row
For xr = 4 To LastRow
With Range(Cells(xr, 3), Cells(xr, 8))
.FormatConditions.Delete
.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreaterEqual,
Formula1:="=$B$" & xr
.FormatConditions(1).Interior.ColorIndex = 4
.FormatConditions.Add Type:=xlCellValue, Operator:=xlLess,
Formula1:="=$B$" & xr
.FormatConditions(2).Interior.ColorIndex = 6
End With
Next xr
End Sub

--
Cheers
Nigel



"greu" wrote in message
...

This macro colors Column B;

i need to color each cell based on a comparaison with the target on
column B


i need to color each cell in the ranges :
C4:H4
C5:H5
..
C9:H9

If i get a macro that works on the file i attached, i will adapt it to
my requirements


--
greu
------------------------------------------------------------------------
greu's Profile:

http://www.excelforum.com/member.php...o&userid=28700
View this thread: http://www.excelforum.com/showthread...hreadid=483837




greu[_4_]

Compare rows to col
 

I know now; you helped me a lot

Thank you


--
greu
------------------------------------------------------------------------
greu's Profile: http://www.excelforum.com/member.php...o&userid=28700
View this thread: http://www.excelforum.com/showthread...hreadid=483837



All times are GMT +1. The time now is 09:08 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com