Excel工作簿自动销毁功能,使用时间到期后自动删除文件( 五 )

End Sub

步骤三:这时候我们发现一个问题 , VBA代码如果不进行加密操作 , 任何人都可以通过删除代码来破解Excel工作薄的使用期限 , 这时候我们需要将VBA代码加密 , 以阻止他人更改代码 。

首先左键单击菜单栏中的工具选项 , 接着左键单击下拉菜单中的VBAProject属性 。 然后在VBAProject工程属性对话框中左键单击保护选项卡 , 并在查看时锁定工程前的方框中打上对勾 。 最后在查看工程属性的密码中分别输入密码和确认密码 , 输入完毕后左键单击确定按钮 , 并关闭Visual Basic编辑器 。

步骤四:最最重要的一步 , 否则你前面的努力就白费了 。 首先左键单击菜单栏中的文件选项卡 , 然后左键单击另存为选项 , 在右侧选择文件的存储路径 。 最后在另存为对话框中的保存类型 , 选择Excel启用宏的工作薄(*.xlsm) , 并点击保存按钮 。

至此 , Microsoft Excel使用期限到期后文件自动销毁功能已经介绍完毕 。 是不是觉得很炫酷呢?有没有科幻大片的感觉?觉得好玩的小伙伴们 , 抓紧时间动手实践操作 。 Excel高级机能学会了 , 那么你距离脱单又进了一步 , 加油吧!

推荐阅读