PDA

View Full Version : Delete empty rows



sukumar.vb
09-05-2011, 01:56 PM
If in Row(n),
Every Col(n) = "",
Then Delete Row(n)

I need help to convert aforesaid algorithm into VBA. :friends:

JWest
09-05-2011, 05:06 PM
Try:


If WorksheetFunction.CountA(Rows(n)) = 0 Then

Rows(n).EntireRow.Delete

Else: End If