Excel工作表密码破解

1. 软件破解

听说用AOPR即ADVANCED OFFICEPASSWORD RECOVERY。但要收费，免费版只能破解4个字符以内。
AOPR官方网下载：http://www.passwordrecovery.cn/

2. VBA代码

把以下VBA代码粘贴到VBA编辑器（Alt + F11），再运行。
此代码适合：office2007~2016

Sub pj()
    Dim sht As Worksheet
    For Each sht In Worksheets
        sht.Protect AllowFiltering:=True
        sht.Unprotect
    Next
End Sub

3. 修改源代码破解

适合.xlsx文件

• 用压缩软件打开.xlsx文件
• 找到文件里：xl\worksheets文件夹
• 在破解哪个工作表就编辑哪个文件，如：sheet1.xml是破解Sheet1的
• 搜索“workbookProtection”或“sheetProtection”或“protectedRange algorithmName”
• 把整个<>内容包括<>本身删除
• 保存

经过以上步骤应该就成功了