VBA保存当前日期文件但删除具有相同名称但较旧日期的旧文件？

Here is my current code:

这是我目前的代码：

Dim strDestinationFile As String
Dim The_file As String
MyOldName = WHAT CAN I PUT HERE <--
MyNewName = strDestinationFile

Sheets("NAME OF SHEET").Select
Range("I2").Select

The_file = ActiveCell.Value

strDestinationFile = "FILE PATH NAME"
Sheets("NAME OF SHEET").Select
ActiveWorkbook.SaveAs Filename:=strDestinationFile
Kill MyOldName
Dim strD