Hi again,
after you have run your recorded macro's try this macro (still before the macro I wrote for you). It will delete rows where there is data in column "E" but no data in column "D".
I think we are through now with all issues!!
Kind regards
Bjorn
PS. Have a look at the code. As you see it is not so complicated with some simple macro's, why not try to learn? It started learning just some few months ago, just by googling around
Sub FixShortMonth()
Application.ScreenUpdating = False
Dim rownum As Long
rownum = 174
Do Until Cells(rownum, 5).Value = ""
If Cells(rownum, 4).Value = "" Then
Cells(rownum, 1).EntireRow.Delete
Else
rownum = rownum + 1
End If
Loop
Application.ScreenUpdating = False
End Sub