excel vba实现工作簿打开后删除文件
- 2020-04-08 08:00:00
- tmtony8 原创
- 696
在Excel电子表格中,我们要保存相对重要的数据,有时并不希望用户在超过的时间再能翻阅该数据。
为了不让数据外漏,希望定时删除表格防止泄露。该如何操作呢?
可以通过VBA代码删除。在Excel对象的ThisWorkbook中的open事件中添加下面的代码
可以自定义删除的时间,主要日期超过了设置的固定日期,即会执行该操作
Private Sub Workbook_Open() If Now() >= #5/4/2020# Then ActiveWorkbook.ChangeFileAccess xlReadOnly Kill ActiveWorkbook.FullName Application.Quit End If End Sub
当工作簿重新启动时,因为现在的时间已经超过了设置的时间。Excel表格中的数据会全部删除。同时会彻底删除表格文件。
Access Activex第三方控件
- office使用部分控件时提示“您没有使用该ActiveX控件许可的问题”的解决方法
- RTF文件(富文本格式)的一些解析
- Access树控件(treeview) 64位Office下出现横向滚动条不会自动定位的解决办法
- Access中国树控件 在win10电脑 节点行间距太小的解决办法
- EXCEL 2019 64位版(Office 2019 64位)早就支持64位Treeview 树控件 ListView列表等64位MSCOMMCTL.OCX控件下载
- VBA或VB6调用WebService(直接Post方式)并解析返回的XML
- Access 或VBA 或VB6 使用 MS SOAP Toolkit 3.0 实现 SOAP Client客户端的功能
Access ADP Sql Server等
- MMC 不能打开文件C:/Program Files/Microsoft SQL Server/80/Tools/Binn/SQL Server Enterprise Manager.MSC 可能是由于文件不存在,不是一个MMC控制台,或者用后来的MMC版
- sql server连接不了的解决办法
- localhost与127.0.0.1区别
- Roych的浅谈数据库开发系列(Sql Server)
- sqlserver 自动备份对备份目录没有存取权限的解决办法
- 安装Sql server 2005 express 和SQLServer2005 Express版企业管理器 SQLServer2005_SSMSEE
- 解决Access数据库的Sql语句中 Top n 语句获取多条记录
文章分类
联系我们
联系人: | 王先生 |
---|---|
电话: | 13928102596 |
Email: | 18449932@qq.com |
QQ: | 18449932 |
微信: | 13928102596 |
微博: | officecn01 |