Printable View
Deletes blank rows Code: ActiveSheet.Columns(1).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
ActiveSheet.Columns(1).SpecialCells(xlCellTypeBlanks).EntireRow.Delete