I have a spreadsheet with 5000 rows. I want to delete each row that does not have a value in Column F.
I appreciate the help.
I have a spreadsheet with 5000 rows. I want to delete each row that does not have a value in Column F.
I appreciate the help.
[vba]ActiveSheet.Range("F1:F5000").SpecialCells(xlCellTypeBlanks).EntireRow.Dele te[/vba]
[VBA]Sub DelBlanks()
ActiveSheet.Range("F:F").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
[/VBA]
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'