I think it's very difficult

[vikas9385]

i want to change the cell colour through if condition without using conditional formatting.......

if you got the answer plz mail me
vikas.negi@mankindpharma.com

 

[Trevor G]

Here is an extract of code to use to colour each cell in a range that has a value of 290 or more

worksheets("ENter the name here").select
dim ran as Range
for each cell in range("A2:H20")
if ran.value>=290 then
ran.font.color=vbred
end if
next

 

[Peter_SSs]

Here is an extract of code to use to colour each cell in a range that has a value of 290 or more

worksheets("ENter the name here").select
dim ran as Range
for each cell in range("A2:H20")
if ran.value>=290 then
ran.font.color=vbred
end if
next

Trevor, I think you should give that code a test. I believe it needs a bit of nmodification.

 

[Trevor G]

worksheets("Enter the name here").select
dim ran as Range
for each ran in range("A2:H20")
if ran.value>=290 then
ran.font.color=vbred
end if
next