I use these variations of macros to delete empty rows all the time.
Hope it helps

http://www.ozgrid.com/VBA/VBACode.htm

Jacob