Hi wnureport
You have 2 choices;
1: You can do a sort first
2: You can do a macro
Sub test()
rowcount = Cells(Cells.Rows.Count, "a").End(xlUp).Row
For i = 2 To rowcount
check_val = Range("a" & i).Value
If check_val < Empty Then
'do something
End If
Next
End Su
--
jette
-----------------------------------------------------------------------
jetted's Profile:
http://www.excelforum.com/member.php...fo&userid=1753
View this thread:
http://www.excelforum.com/showthread.php?threadid=55657