More than 3 Conditions
Excel 2003
Sub cus
Dim cell as Range
For Each cell in Range("T5:T90").Cells
If cell.Value10 Then
cell.Interior.ColorIndex = 8
Elseif cell.Value=20% and cell.Value=<10% Then
cell.Interior.ColorIndex = 6
Elseif cell.Value<20% Then
cell.Interior.ColorIndex = 3
Elseif cell.Value0 and cell.Value<10% Then
cell.Interior.ColorIndex = 50
End If
Next cell
End Sub
On 20 Lis, 14:31, John Moore
wrote:
Hi, I am looking for a code which will do the following for me
Range is T5:T90
Condition 1: If Cell value is 10 make background light blue
Condition 2: If cell value is between -10% and -20% make background yellow
Condition 3: If cell value is < -20% make background red
Condition 4: If cell value is < 10% but 0% make background green.
|