I have a range selected in a Column and am trying to delete the Blan
cells out. The following code works if there are blank cells in th
range, but if there are not it gives an error.

Selection.SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp




Is there a way of doing it so it doesn't give an error, or should
just do On Error Resume Next for this section of the macro

--
Krage
-----------------------------------------------------------------------
Krager's Profile: http://www.excelforum.com/member.php...fo&userid=2093
View this thread: http://www.excelforum.com/showthread.php?threadid=40170