Sub Delete2() Range("E3:E168").SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub
This works fine if column E is empty, but if there is a formula inside it and even though its blank. It will not delete row. So i think its needs something added if the cells are blank even if a formula is inside it. Still delete the row.