Try this to get the exact. Change "e" to suit your column

Sub comparerows()
For i = Cells(Rows.Count, "e").End(xlUp).Row To 1 Step -1
If Cells(i, "e") = Cells(i + 1, "e") Then MsgBox Cells(i + 1, "e").Row
Next
End Sub

--
Don Guillett
SalesAid Software

"yusee_ygs" wrote in message
...
I would like to compare the rows 1 and 2 (names) and have a logical value
returned. Is there a way to do this so that it compares only row 1 and 2,
3
and 4 and not 2 and 3...
I have 1500 rows of the names and I would like see which rows have the
exact
names and which dont.
Please guide. Thanks

Kat Warren
Kat Warren
McKenney James
McKenney James
Yelli Albert
Yelli Albert
Green Stephen
Green Stephen
Block Stanley
Block Stanley
Steigbigel Roy
Steigbigel Roy