Hi,

Try this

Sub aileen()
lastrow = Cells(Cells.Rows.Count, "B").End(xlUp).Row
Set MyRange = Range("B1:B" & lastrow)
For Each c In MyRange
If c.Value = Range("C1").Value Then
c.Offset(, -1).Value = "cbo"
End If
Next
End Sub

"aileen" wrote:

In column A I have cells filled with text and in column B I have cells filled
with numbers. I need to check if the number in cell C1 equals any of the
numbers in column B. If a match is found then I need to change the text in
column A to CBO.
e.g.
Column A Column B Column C
aep 5 7
apa 0
gci 59
xto 5000
xle 7
oih 253
ed 8

Since the cell C1 = 7 equals the 7 from column B, I need to change the data
in column A from xle to cbo. Is this possible?