Loop and delete
 

I want to delete every row on the sheet where cell B has no value. How
can I do that?

Regards,

SE

Loop and delete
 

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

wrote in message
oups.com...
I want to delete every row on the sheet where cell B has no value. How
can I do that?

Regards,

SE

Loop and delete
 

For i = Cells(Rows.Count,"B").End(xlUp).Row To 1 Step -1
If Cells(i,"B").value = "" Then
Rows(i).Delete
End If
Next i

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

wrote in message
oups.com...
I want to delete every row on the sheet where cell B has no value. How
can I do that?

Regards,

SE

Loop and delete
 

Thanks a lot, Bob!

// SE

Bob Phillips skrev:

For i = Cells(Rows.Count,"B").End(xlUp).Row To 1 Step -1
If Cells(i,"B").value = "" Then
Rows(i).Delete
End If
Next i

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

wrote in message
oups.com...
I want to delete every row on the sheet where cell B has no value. How
can I do that?

Regards,

SE