MWS, How about something like this

[A1:A50].SpecialCells(xlCellTypeBlanks).EntireRow.Delete
--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2000 & 2003


"MWS" wrote in message
...
Can someone direct me how to create a loop which will start at the top; or
botton, of a series of data and blank rows, and loop through each row and
delete the rows which are completely empty?

Any and all help would be appreciated. Thanks in advance!!!!