try this
Sub RowBeGone()
Columns("A").SpecialCells(xlCellTypeBlanks).Entire Row.Delete
End Sub

--
Don Guillett
SalesAid Software

"vikram " wrote in message
...
a macro which can quickly delete entire row when column A is blank

please help me with this
thank u so much frnds


---
Message posted from http://www.ExcelForum.com/