insert Pick where?

for each cell in Range("C10:M10")
if cell.Value cell.offset(1,0).Value then
cell.offset(0,something).Value = "Pick"
end if
Next

--
Regards,
Tom Ogilvy

"hotherps " wrote in message
...
I'm using the following code:

For Each CELL In Range("B9:K20")
If CELL.Value = "PICK" Then
For J = 1 To 8
If CELL.Offset(0, J).Address < "F5" Then
CELL.Offset(0, J).Value = "PICK"
End If
Next J
End If
Next CELL

As you can see the criteria is if a cell in the range = "Pick".

I want to create a second For next loop that will look at a different
range of cells C:10 and C11. If C11 C10 then insert "Pick".

The continue if D11 D10 etc.

Can't get it to work.
Thanks


---
Message posted from http://www.ExcelForum.com/