Delete Entire Row For All Empty Cells In Column

[patel]

question 1 (delete rows if blank) : i'm using this code

Worksheets("Data").Columns("M").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

[B] but i have little problem if not blank this run-time error 1004 .....

your code works well on my test workbook (excel 2010), also with not blank cells