如何使指定的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工作表中的第一行第一列单元格保护起来（设定该单元格为锁定，保护起工作表），只有知道密码才能修改。

注：前提是要把宏的安全性调到低，即：“工具－宏－安全性”，把安全级别调至低。

1、首先打开要进行加密的Excel文件。

2、然后点击左上角的文件。

3、接着选择信息，点击保护工作簿下拉框。

4、再点击用密码进行加密。

5、最后输入密码点击确定后再次确定密码即可。

注意事项：

Office常是制作文档文件的标准，而且有一些其他产品不存在的特性，但是其他产品也有Office缺少的特性。自从Microsoft 2007 Office System开始，有一个和以前版本差异很大的用户界面，该界面被称为Ribbon界面，并沿用在Microsoft Office 201中。

自我销毁（彻底删除文件）是不行的，但是可以通过VBA控制，在程序被打开N次后，自动清空所有内容。

具体流程（用VBA编程）：

添加一个sheet，然后用代码锁定这个sheet，这个里面记录打开次数。

当文件被打开的时候，自动累加一次，当到达你预先设定的次数，那么就执行代码，将内容全部清除sheet1~sheetN。

大概方法是这样，这个需要你自己写VBA来搞定咯。

我想应该没有其他简便的方法。

---