i changed this line
If Application.CountA(Cells(i, 1).Resize(1, 3)) = 0 Then
to
If Application.CountA(Cells(i, 1).Resize(1, 3)) <3 Then

there should be 3 non blank cells in each row from column a to c. if there
is less than 3, it deletes the row, which would equate to an "or" statement,
at least in my mind<g

i guess i could have changed the delete action line to do nothing if counta
= 0, too.


--


Gary


"JE McGimpsey" wrote in message
...
In article ,
"Gary Keramidas" wrote:

thanks je:

one question:

just curious, how do i know the CountA(Cells(i, 1).Resize(1, 3)) creates
an
or condition?

It doesn't. It calls XL's COUNTA function for cells Ai:Ci. See COUNTA in
XL help to understand what it returns.