Deleting Blank rown in a column

[zaska]

Hello,

Can anyone help me with a VBA code to delete Blank rows in a column.

Thanks

 

[Rick Rothstein]

Do you mean you want to delete the entire row for those rows where the cell in your unnamed column is blank? If so, what is the column, what is in the column (constants or formulas), and about how many rows maximum could your data have?

 

[zaska]

Hi,

I have the data in ColumA in 5000 rows having few blank (Empty) rows and i want to delete them using VBA.

Thank you

 

[Rick Rothstein]

I have the data in ColumA in 5000 rows having few blank (Empty) rows and i want to delete them using VBA.

Assuming "data" means constants, and not formulas (you didn't answer that question), then give this macro a try...

Sub DeleteBlankRows()
  Columns("A").SpecialCells(xlBlanks).EntireRow.Delete
End Sub

 

[zaska]

Hi,

Thank you it worked