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 IfEnd Sub”运行宏