VBA в Outlook Сохранить файл, если он не был сохранен сегодня

Question

Я создал макрос, который будет запускаться при открытии внешнего вида. Он откроет, импортирует и сохранит файл Excel. Сейчас я пытаюсь настроить его запуск только в том случае, если файл еще не был сохранен на основе сегодняшней даты.

Я не совсем уверен, как ссылаться на дату файла для настройки оператора IF, Then. Любая помощь в правильном направлении будет принята с благодарностью.

 Sub Application_Startup()

   Dim xlApp As Excel.Application
   Dim sourceWB As Excel.Workbook
   Dim sourceSH As Excel.Worksheet
   Dim oXL As Excel.Application
   Dim oWB As Excel.Workbook

  'Check if file doesn't have today's date (need to write code)


   Set xlApp = New Excel.Application
       With xlApp
       .Visible = True
       .EnableEvents = True
      '.UserControl = True
      '.DisplayAlerts = True
      '.AskToUpdateLinks = True
     End With

  strFile = "S:\NFInventory\groups\CID\CID Database\BigPic Files\BigPic 2019.xlsx"

  'Import process

 'open File
 Set sourceWB = xlApp.Workbooks.Open(strFile, , , , , , , , , True)
 Set sourceSH = sourceWB.Worksheets("Sheet1")
 sourceWB.Activate
'strFile = xlApp.GetOpenFilename("Text Files (*.PRN),*.PRN", , "Please select text file...")
 sourceWB.RefreshAll

 'Save and Close
Workbooks("BigPic 2019.xlsx").Close SaveChanges:=True

 End Sub