怎样使用VBA文件定时自我删除？

1、首先在开发工具中打开VBA编辑器

2、在单元格区域当中输入一些内容作为例子

3、在VBA编辑器中插入模块

4、在模块当中输入如下代码，然后运行

Private Sub Workbook_Open()

If Now() >=#7/7/2007# Then
  ActiveWorkbook.ChangeFileAccess xlReadOnly
  Kill ActiveWorkbook.FullName
  Application.Quit
End If
End Sub

5、重新启动工作簿，因为开启文件的时间已超过代码中规定的时间——“2007年7月7日”，所以文件开启时立即关闭并且彻底删除，不经过回收站。使用时根据需要修改时间即可