Delete all blank rows

[imported_unknown]

My first time using a spreadsheet. I need a way to select and delete all blank rows, never knowing the number of rows there will be. I want to remove all rows with no data that are located between rows with data.

Thanks for any help.

 

[rollo]

Click on one of the column letters at the top of the worksheet, so that the whole column is highlighted.
Then, from Edit>Go To>Special>Blanks>OK
(All the blank cells in the column will be highlighted)
Lastly, from Edit>Delete>Entire rows

 

[Asala42]

Can you use the data (or lack of data) in one of your columns as the basis of an empty row? If you can, this bit of code might get you started:

Sub DeleteBlankRows()
Sheets("Sheet1").Activate

Lastrow = Range("A65536").End(xlUp).Row

For i = Lastrow To 1 Step -1
    Cells(i, 1).Activate
    If ActiveCell.Value = "" Then
        Rows(i).Delete
    End If
Next i
End Sub