junys 发表于 2019-4-30 16:30

基于xls与xlsx的Excel工作表(簿)保护密码解除器 v1.0

原理:xls\xlsx设置了工作表(簿)保护密码后打开文档,只能看,无法修改
表解除方法:
1.将扩展名 .xlsx 改为 .zip 压缩包
2.打开压缩包,名字为 lx 的文件夹下 的 worksheets 文件夹
3.用记事本等修改里面加保护的工作表 例如sheet1 文件名就是 sheet1.xml ,把<sheetProtection一段删掉
4.重新打包,并把扩展名改回 .xlsx

簿解除方法:
1.执行“开发工具”--“Visual Basic”,打开VBE编辑器
2.执行“插入---模块”
3.复制下面代码

Sub pojie()
    ActiveWorkbook.Sheets.Copy
    For Each sh In ActiveWorkbook.Sheets
      sh.Visible = True
    Next
End Sub
4.按下F5 或点击 运行按钮执行代码 运行之后会自动产生一个excel 保存就好了~


代码的意思 是把这个表 复制 到另一个簿上的表 。





之前写了Word (传送门)发现很多人 和我说 要Excel的!!!!(你们需求很大 满足你们吧~)
所以自己花了几分钟又写了一个单文件封装的小玩意。为了兼容各位大佬的电脑 用了.Net 2.0的


本程序无毒 无壳 无混淆 所以也提不上什么破解 啥的~ 好用 就拿去


想看代码思路 也可以反编译自己看反正 用了 点击文件处理 拖拽文件处理 以及 。。。 用线程让UI 不卡死。

使用方法:点击 或者 脱进去 处理完成 后 会弹出保存框 自己选择 保存出想要的名字 就好了~


此工具 只支持这样 的 工作表保护工作簿保护 取消掉!~





链接:https://pan.baidu.com/s/1A6_7piYwCjWFxkg-mylIaA
提取码:4vcm


有什么BUG 欢迎在回帖中提出。


由于上次 很多人 弄了 这个!!加密!!~ 来问我 (我已经说了 能打开(这种加密不能打开只能暴力跑字典解决~我也不想研究了) 不能修改!~)








一个人的牢骚886 发表于 2019-9-16 10:26

楼主,我这边有个XLSM文档,立面的VBA打不开,有没有办法查看代码啊,表格是免费分享得,但是是管理信用卡的,就是因为管理信用卡所以有所担心
2019信用卡管理表(高级加密版)
表格初始登录密码:1234
需要球盖密码的话,输入完密码后点修改即可
链接:https://pan.baidu.com/s/1yAm7oojg4fjMoORJKMlEyw
提取码:ojxl
您看下能帮忙解决吗

boy666666 发表于 2019-7-16 19:34

junys 发表于 2019-4-30 21:15
dll 大 我也没办法。 不封装 你们又问我 为啥 那么多个文件。 我也很苦恼。

楼主,谢谢,我提出一个BUG,不知道大家有没有遇到,我下载后测试一个文件,是2.75M,用作者的小工具去除了保护,密码是数字加字母,一共8位,时间快,但是解除保护的文件只有20KB,我一张表是2000多行,结果只有200行,不知道大家遇到这个问题没

左岸麦田 发表于 2019-4-30 16:42

感谢楼主,没想到这么快就做出来了,省事。

lpzl 发表于 2019-4-30 16:43

说不定哪天就用得上,感谢分享!!!!

heham 发表于 2019-4-30 16:44

为懒人造福了

junys 发表于 2019-4-30 16:45

左岸麦田 发表于 2019-4-30 16:42
感谢楼主,没想到这么快就做出来了,省事。

做得太快 。有bug 及时反馈 哈哈 ~修复是一件漫长的事情~

lizhipei78 发表于 2019-4-30 16:48

我一般用插件,如excel必备工具箱,excel精灵,这些能一键清除限制类密码

junys 发表于 2019-4-30 16:49

lizhipei78 发表于 2019-4-30 16:48
我一般用插件,如excel必备工具箱,excel精灵,这些能一键清除限制类密码

{:1_918:}确实 插件 都是 VB脚本 也挺方便的 开个宏 就完事了。~

轩东丨Away 发表于 2019-4-30 16:53

你这个标点符号用的溜啊,看的我都磕巴了

JieW_L 发表于 2019-4-30 16:56

我用 xlsb 你这个有效过吗

junys 发表于 2019-4-30 17:31

轩东丨Away 发表于 2019-4-30 16:53
你这个标点符号用的溜啊,看的我都磕巴了

哈哈 火星贴鉴定
页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 基于xls与xlsx的Excel工作表(簿)保护密码解除器 v1.0