基于xls与xlsx的Excel工作表/簿保护密码解工具

行业软件 2020-04-05 17:02:07

基于xls与xlsx的Excel工作表/簿保护密码解工具

原理:xls\xlsx设置了工作表(簿)保护密码后打开文档,只能看,无法修改
表解除方法:
1.将扩展名 .xlsx 改为 .zip 压缩包
2.打开压缩包,名字为 lx 的文件夹下 的 worksheets 文件夹
3.用记事本等修改里面加保护的工作表 例如sheet1 文件名就是 sheet1.xml ,把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 保存就好了。