Deleting range not a row

[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.

 

[Tom Ogilvy]

Range("A12:G12").Delete Shift:=xlShiftup

 

[Robert]

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

 

[Robert]

Many thanks

Robert

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.