Macro to delete row if row blank but cells do have formulas in the

[Cathy]

HI, I have limited VBA knowledge. I have a very large worksheet where I need
a macro to delete rows that are blank. The cells look blank but have
formulas in them. Does anyone have a macro to do this. Also, I have three
worksheets in this file and the one I'm working with is called
"Implementation".

Thanks,
Cathy

 

[Ron de Bruin]

Hi Cathy

You must loop through them and test for ""

See
http://www.rondebruin.nl/delete.htm

Use this line in the macro

ElseIf .Cells(Lrow, "A").Value = "" Then .Rows(Lrow).Delete
'This will delete each row if the cell is empty or have a formula that evaluates to ""


Or use EasyFilter that have a option to do this
http://www.rondebruin.nl/easyfilter.htm

 

[Cathy]

Thanks Ron. It worked great!!

Cathy

Hi Cathy

You must loop through them and test for ""

See
http://www.rondebruin.nl/delete.htm

Use this line in the macro

ElseIf .Cells(Lrow, "A").Value = "" Then .Rows(Lrow).Delete
'This will delete each row if the cell is empty or have a formula that evaluates to ""


Or use EasyFilter that have a option to do this
http://www.rondebruin.nl/easyfilter.htm