EX-VBA：迄今为止最简单的Excel工作表密码解除方法
不知道是哪位大神发现的这么一个类似Excel的软件漏洞一样的工作表密码破解方法，太牛逼，分享如下，供忘记密码的朋友应急使用：
『 动画解读 』
对于设置了工作表密码的工作簿，打开后，具体操作步骤如下：
Step-01：通过菜单【开发工具】-【Visual Basic】进入VBA编辑界面
Step-02：在VBA编辑窗口的【立即窗口】中逐步执行以下代码（输完一句回车后再输入另一句并回车其中sheet1为需要破解密码的工作表的名称）
sheet1.Protect AllowFiltering:=true
sheet1.unProtect
逐步执行这两行代码后，工作表的密码将被解除！！！
如果打开VBA编辑窗口时没有立即窗口，可以通过菜单【视图】-【立即窗口】调出来，如下图所示：
『 扩展应用 』
如果需要批量解除的，可以自行加入循环控制语句，写成一个过程。代码参考如下（将代码复制放在ThisWorkbook下，然后运行）：
Sub clsWkShtPwd()
Dim sht As Worksheet
For Each sht In Worksheets
sht.Protect AllowFiltering:=True
sht.unprotect
Next
End Sub
在此再次感谢大神们的分享！同时，一门技术是好是坏，全凭个人掌握，用于益处是为好……
【
Power系列基础精选
】
赞 (0)