VBA to delete a row after a time period has expired.

[Jamma]

Hi all,

I’m looking for a VBA code that will delete a row 34 days after the date in the row.

I’m a complete novice with VBA and couldn’t find what I was looking for by searching.

Thanks

 

[Logit]

.
This is "air code" ... hopefully to get you started.

If Today() - 34 = Sheets("Sheet1").Range("A1").Value Then
     Sheets("Sheet1").Range("A23").EntireRow.Delete
End If

 

[Jamma]

Thank you very much.

 

[Jamma]

Hi I tried that buts not recognising the Today() function.

 

[Logit]

.

Option Explicit


Sub delRow()


If Sheets("Sheet1").Range("A1").Value = Date - 34 Then
     Sheets("Sheet1").Range("A3").EntireRow.Delete
End If


End Sub