Deleting range not a row

  • Thread starter Thread starter Robert
  • Start date Start date
R

Robert

I have a workbook with data in columns A:N and I need to be able to
delete any blank part rows in columns A:G without disturbing the data in
columns H:N.
How do I delete ranges, eg A12:G12 where A12 is blank, without deleting
the remaining part of the row - H12 onwards?
I know how to delete individual blank cells or entire rows where a cell
is blank but not part rows.
Grateful for any suggestions.
 
My original query was not clear - I want to delete all part rows in
columns A:N where the cell in column A is blank without selecting each
part row individually. The following will delete complete rows;
Range("A3:N1000").Select
Selection.SpecialCells(xlCellTypeBlanks).EntireRow.Delete
but I don't know how to restrict the deletions to columns A:N.

Robert
 
Many thanks

Robert

Tom Ogilvy said:
Your original query was clear and I answered the question you asked. If
your question now is how to implement this for the range

Sub DeleteRows()
Range("A3:N30").Select
Selection.SpecialCells(xlCellTypeBlanks) _
.EntireRow.Select
Intersect(Selection, Columns("A:N")).Select
Selection.Delete shift:=xlShiftUp
End Sub

Gets the job done.
Click to expand...
 
Back
Top