Hi there,

Im sure there is a simple macro to do this but I have tried doing it myself without asking for advice and its not working.

I want to be able to clear the contents of whole rows where cells in column F are empty. Heres my latest attempt that doesnt work (Im sure Im way off)

Sub deleteasterix()
Application.ScreenUpdating = False
Dim RowNum As Long
For RowNum = Columns("F").Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
    If Columns("F").Rows(RowNum).Value And IsBlank.Columns("F").Rows(RowNum).Value Then IsBlank.Columns("F").Rows(RowNum).EntireRow.ClearContents
Next RowNum
Application.ScreenUpdating = True
End Sub
Any advice would be great, cheers