Excel工作表打开一次后自动销毁文件,回收站中都找不到

知识改变命运,科技成就未来。

一次性物品在生活中随处可见,但是你见过一次性Excel工作表吗?简单地说就是你发给客户的Excel工作表,他只能打开浏览一次,一旦他关闭Excel工作表后,文件会自动删除,而且删除得干干净净,回收站都找不到。

这样设置的目的是为了保证文件的安全性,如果是重要文件未被及时删除,造成内容泄露,给公司造成不必要的损失就亏大了,所以说设置一次性文件很有必要。

我们先来看一下展示效果。是不是觉得很神奇呢?接下来一起探讨Excel一次性文件怎么制作吧!

步骤一:通过编辑VBA代码来制作一次性工作表。首先右键单击示例工作表,然后左键单击右键菜单中的查看代码选项,打开Visual Basic编辑器。在工程资源管理器窗口中左键双击【ThisWorkbook】选项,打开ThisWorkbook的代码窗口,并将以下代码复制粘贴到代码窗口中。

代码区域:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

ActiveWorkbook.ChangeFileAccess xlReadOnly

Kill ActiveWorkbook.FullName

Application.Quit

End Sub

步骤二:先别着急关闭Visual Basic编辑器,接下来要做的是限制VBA代码查看和编辑权限,如果不进行加密设置的话,别人可以随意更改和查看代码,那么你所编辑的VBA代码指令就失效了,前面做的准备工作就白费了。对VBA代码加密具体操作流程请参考文章Excel工作簿自动销毁功能,使用时间到期后自动删除文件,在步骤三中有详细的操作指南。设置完成后关闭Visual Basic编辑器回到Excel工作表界面。

步骤三:最后一步,但也是最最重要的一步,看过上一篇文章的小伙伴请注意啦,这次的操作方法不同于上一篇文章的操作。虽然都是将Excel工作表另存为Excel启用宏的工作薄(*.xlsm),但是本次需要将Excel工作表另存为二个工作表,并重命名为不同的名称。例如:第一次另存为名称设置为A.xlsm,第二次另存为的名称设置为B.xlsm。

这样设置的目的是因为另存为文件后,会将存储的文件打开,如果你执行关闭的话,文件就会被自动删除。但是如果存储两个文件,只会删除最后存储的那个文件。实例中,最后存储的文件为B.xlsm,所以被删除掉的是B.xlsm。

至此,Microsoft Excel使用一次后文件自动删除功能已经介绍完毕。在制作一次性Excel工作表之前,请做好文件的备份,文件自动删除后除非使用数据恢复软件,回收站是找不到的,请谨慎操作。

动动手指点击关注和转发,让更多的人告别加班的烦恼,每天掌握一些科技小技巧,相信也会为您的工作和生活带来便捷。

  • 发表于:
  • 原文链接https://kuaibao.qq.com/s/20190818A0FGSG00?refer=cp_1026
  • 腾讯「云+社区」是腾讯内容开放平台帐号(企鹅号)传播渠道之一,根据《腾讯内容开放平台服务协议》转载发布内容。

扫码关注云+社区

领取腾讯云代金券