View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
FrankNL
 
Posts: n/a
Default Delete empty rows with cell type 2


I'm using the following macro to copy the columns A:R to a new sheet. In
this new sheet the empty rows are deleted. These rows are determined by
any empty cells in column E.

Sub copypaste()

Columns("A:R").Select
Selection.Copy
Sheets("RowsDeleted").Select
Range("A1").Select
ActiveSheet.Paste

Columns("E:E").Select

On Error Resume Next
Selection.SpecialCells(xlCellTypeBlanks).EntireRow .Delete
ActiveSheet.UsedRange

End Sub


The problem I'm having is that it only deletes the rows where the cell
in column E is a number (cell type 1), but I want it to also remove the
empty cells with cell type 2 (text).

I tried to use other columns but the have the same problem.

Does anybody have a solution?

thanks


--
FrankNL
------------------------------------------------------------------------
FrankNL's Profile: http://www.excelforum.com/member.php...o&userid=34074
View this thread: http://www.excelforum.com/showthread...hreadid=538376