I have this Macro that if a particular column has a an empty cell then it should delete the entire row...
It works BUT it limited to the number of rows it deletes at a given time (meaning I need to keep re-running this macro)
i cant pinpoint the reason it stops...i double check each column and even highlighted the empty columns and deleted (incase of a . or anything else I might of missed and it stills doesnt run 100% thorugh the list at 1 time)
here is the macro
----------------------------
Sub deleteemptyrow()
Dim c As Range
Range("a2").Select
For Each c In Range("b1:b" & Range("b65536").End(xlUp).Row)
If c.Value = "" Then
'MsgBox ("nothing")
c.Offset(0, 0).EntireRow.Delete
End If
Next c
'Exit For
End Sub
It works BUT it limited to the number of rows it deletes at a given time (meaning I need to keep re-running this macro)
i cant pinpoint the reason it stops...i double check each column and even highlighted the empty columns and deleted (incase of a . or anything else I might of missed and it stills doesnt run 100% thorugh the list at 1 time)
here is the macro
----------------------------
Sub deleteemptyrow()
Dim c As Range
Range("a2").Select
For Each c In Range("b1:b" & Range("b65536").End(xlUp).Row)
If c.Value = "" Then
'MsgBox ("nothing")
c.Offset(0, 0).EntireRow.Delete
End If
Next c
'Exit For
End Sub