UC知道excel中添加一个时间限制，到期之后可以自动添加密码！
来源：百度知道 编辑：UC知道 时间：2024/05/10 05:26:24
就是在EXCEL工作簿中，添加一个时间限制，到规定时间后会自动给该EXCEL工作簿增加一个密码，如果编制宏，请大虾们写出代码，我研究下，非常感谢！
看看这个行吗？
Sub auto_open()
Set wok = ActiveWorkbook
If Date > #10/18/2009# Then '如果系统时间超过“2009-10-18”，则执行下述程序
a = wok.Name
b = wok.Path
c = b & "\" & a
Application.DisplayAlerts = False '关闭提示
wok.SaveAs Filename:=c, Password:="123" '保存文件，设置打开密码
Application.DisplayAlerts = True '打开提示
End If
End Sub
增加密码有用吗？
Excel密码是最容易被破解的了……
想法很好，（或者用白话说：想得美）
但建议不要做徒劳的事。
破解密码用OPR