Excel表格如何设置在指定时间自焚？一串VBA代码轻松实现
2018-09-28 本文已影响6人
463276bad154
写在前面
无论是学生党还是职场人士平常应该少不了交各种Excel表格吧。Excel表格里面可能包含了你很多重要的隐私信息，比如说：身份证号、电话号码和家庭住址等。
虽说如今大数据的时代，我们的隐私已经不算得是什么隐私了，但有时防范一下还是好了。今天就教大家如何设置Excel在指定时间自动销毁。
VBA代码
Private Sub Workbook_Open()
If CDate(Date) > CDate("2018-9-27") Then
sheet1.range("A1:C3")= ""
End If
End Sub
//代码说明：该代码会在2018年9月27日后清空表格sheet1中A1:C3的数据！因此根据你的实际需求，自行更改“2018-9-27”和“A1:C3”。
演示教程
1.首先我们打开一个要设置在[指定时间自焚]的Excel表格
2.单击文件-选项-自定义功能区，勾选开发工具，点击确定
3.此时返回发现功能区里已有开发工具这一选项了，然后点击Visual Bisic
4.双击ThisWorkbook，复制粘贴前面的VBA代码
5.点击文件，选择保存（或快捷键：Ctrl+S保存）
6.点击否
7.另存为启用宏的工作簿.xlsm，点击保存
8.点击确定
9.关闭Excel，此时发现桌面上多了一个带宏图标的Excel表，双击打开
10.点击启用内容（也就是启用宏，小编的电脑把宏功能禁用了，对于其它没有禁用宏的电脑，打开表格，对应单元格内的数据会在指定时间删除）
11.你会发现表里A1:C3的数据全部被清空了（因为小编设置的时间是9月27日后删除，而今天已经是28日了）
喜欢可以点个赞，关注我们，赞赏支持的话当然更好呢(ฅ>ω<*ฅ)~~我是你们的干货共享君，每天更新不一样的黑科技干货！关注获取更多干货，转载请注明出处！
