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
Bookmarks