Create a pop-up message when opening a file after given date

[TimeFlies1074]

Is there a way to create a pop-up message when my file opens after a set date?

 

[JLGWhiz]

Put this in your ThisWorkbook code module and then Save the workbook as a Macro Enabled workbook to preserve the code.

Private Sub Workbook_Open()
If Date > #12/6/2016# Then
    Beep
    MsgBox "Past Target Date"
End If
End Sub

Change the date between the # symbol to suit your purposes.

 

[TimeFlies1074]

Exactly what I was looking for! Thanks JLGWhiz!

 

[JLGWhiz]

Exactly what I was looking for! Thanks JLGWhiz!

You're welcome
regards, JLG