one way

Sub findnot()
For Each c In Range("c6:g6")
If ucase(c) < "CUCUMBER" Then MsgBox c.Column: Exit Sub
Next
End Sub

--
Don Guillett
SalesAid Software

"umop apisdn" wrote in message
...
Hi,

I have 100 columns. How do I find the first column that does not contain
any cell with the value "Cucumber".

Thanks for any help,

Rob