Delete rows if they are empty

  • Thread starter Thread starter chrismania
  • Start date Start date
C

chrismania

Hi Guys,
already have asked that questions. But your proposals did not work.
Thanks anyway.
I have the following problem.
I have a table with the following structure:

Name Surname Adress Number
Name 1 Surname 2 Adr1 1
(this row
is empty for ex.)
Name 2 Surname 2 Adr1 2

......

Some rows are empty. I want to delete the rows if they are empty. So
the structure should look like this:

Name Surname Adress Number
Name 1 Surname 2 Adr1 1
Name 2 Surname 2 Adr1 2

Do you have an idea for an easy code?

Cheers and thanks Christoph
 
This was found in Google search:

Sub DeleteBlanks()
'' Deletes all rows that have blanks in Column A .
Columns("A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
 
You could select all your cells then sort your data. All the blank rows
will be sorted to the end.
 
That deletes the rows if column A has an empty cell, whether the row is
empty or not - if that works, great. But it is not what you described.
 
Back
Top