I have read up on this and I am trying to delete rows with date greater than and earlier then yesterday. I have been anything but successful but I have created a bit of code that takes forever to run with absolutely no positive results. Dates are in column A.
LastRow = Cells(Rows.Count, "A").End(xlUp).Row
For j = 2 To LastRow
If Cells(j, "A").Value < Date - 1 Then
Cells(j, "A").EntireRow.Delete
End If
Bookmarks