on error resume next
activesheet.range("a:a").cells.specialcells(xlcell typeblanks).entirerow.delete
on error goto 0

STEVEB wrote:

Does anyone have any suggestions for a code that will look at column A
and if any cell is blank in column A then delete the entire row?

Any help would be greatly appreciated.

Thanks!

--
STEVEB
------------------------------------------------------------------------
STEVEB's Profile: http://www.excelforum.com/member.php...fo&userid=1872
View this thread: http://www.excelforum.com/showthread...hreadid=491829

--

Dave Peterson