VBA如何实现，工作簿被解除保护，则自动删除所有工作表

ddrdx · 发表于 2022-12-26 20:02

本帖最后由 ddrdx 于 2022-12-26 20:07 编辑

某个表格工作簿是保护着的，

如果解除保护

就会把下面所有工作表都删除

应该如何做到自动监控

高个子 · 发表于 2022-12-26 20:10

删除所有工作表做不到，最多能做到只剩一个

ddrdx · 发表于 2022-12-26 20:12

高个子发表于 2022-12-26 20:10
删除所有工作表做不到，最多能做到只剩一个

好的，如果只保留sheet1，应该如何编写

shiruiqiang · 发表于 2022-12-26 20:14

表格工作簿是保护着的,他能破解的话，怎么破不了你的代码？

leolee82 · 发表于 2022-12-26 23:34

怎么弄都没用

WANT-T · 发表于 2022-12-27 10:35

首先工作簿密码压根破解不了，其次，人家都有了破解工作簿密码的能力了，还能让你的代码运行自毁程序，宏一禁用，一切白瞎！第三，请搞点正经的东西玩吧！

高个子 · 发表于 2022-12-27 11:05

ddrdx 发表于 2022-12-26 20:12
好的，如果只保留sheet1，应该如何编写

上传附件吧

ivccav · 发表于 2022-12-27 16:38

工作簿密码目前无法破解（合理时间内），如果他有能力破解工作簿密码，你那个VBA工程密码连小儿科都不算。

搞这些东西没有用的，多研究怎么解决问题是更好的选择。

aman1516 · 发表于 2022-12-27 22:06

工作表保护密码、工作簿保护密码、VBA工程密码，一破即解，工作簿打开密码就呵呵了
不想给别人用就藏着收着不要给别人用，
光整些“到时间就自毁”、”破解就删除”什么的、累不累呢.......
真要处理，可用
ActiveWorkbook.ProtectStructure 和 ActiveWorkbook.ProtectWindows
判断处理一下

		自动登录	找回密码
密码			免费注册

[求助] VBA如何实现，工作簿被解除保护，则自动删除所有工作表