1、打开你需要发送的或指定的excel表格。

2、按住键盘的Alt + F11 进入VBA的编辑界面肥边蚂

3、选中sheet 1 窗陕没口,复制以下代码:
“
Private Sub Workbook_Open()
If Date >= "日期" Then
Application.DisplayAlerts = False
MsgBox "输入你想对打开者所提示的文字。"
裕祝 With ThisWorkbook
.Saved = True
.ChangeFileAccess xlReadOnly
Kill .FullName
.Close
End With
End If
End Sub
”
运行宏

1、完成。
这是一个VBA的OPEN事件,当超过指定日期打开这个工作表后,就会提示相关信息后,windows自动删除这个工作表。