Ⅰ 如何使指定的EXCEL文件在设定的时间内自动删除
可以这样实现:
先依次“工具-宏-Visual Basic编辑器”,打开VBA窗口,点击左边窗口,展开目录树,双击“ThisWorkBook”,打开代码窗口,把下面的代码复制进去:
Private Sub Workbook_Open()
Dim 终止 As Date
终止 = Sheet1.Cells(1, 1) '保存要自动删除的日期
If Now() >= 终止 Then
ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill ActiveWorkbook.FullName
Application.Quit
End If
End Sub
保存,回到EXCEL窗口,以后只要把你要删除的时间日期写在sheet1工作表中的第一行第一列单元格(日期格式一定要对),保存退出,以后到了要删除日期(比如:2009年5月18日),打开时就会自动删除该文件。
你还可以把sheet1工作表中的第一行第一列单元格保护起来(设定该单元格为锁定,保护起工作表),只有知道密码才能修改。
注:前提是要把宏的安全性调到低,即:“工具-宏-安全性”,把安全级别调至低。
Ⅱ 发出去的excel文件怎么销毁
1.如果是用邮箱发出去的excel文件,可以撤回。
2.如果是用微信发出去的excel文件,在发出去后两分钟之内可以撤回。
3.如果是用QQ发出去的excel文件,在两分钟之内也可以撤回。
以上第2和第3点,如果excel文件发出去两分钟以后就没有办法撤回,也没有办法销毁。