EXCEL工作表保護密碼破解方式
阿新 • • 發佈:2019-01-28
Excel工作表密碼保護的解除方法
Excel彈出“您試圖更改的單元格或圖表受保護,因而是隻讀的。若要修改受保護單元格或圖表,請先使用‘撤消工作表保護’命令(在‘審閱’選項卡的‘更改’組中)來取消保護。可能會提示您輸入密碼。
出現這種情況,應該怎麼解決呢?經過研究,找到了兩種破解Excel工作表保護碼的方法。
一、VBA巨集程式碼破解法:
第一步:開啟該檔案
第二步:按Alt+F11,進入VBA編輯介面;
第三步:插入一個Module;
第四步:在右邊Module的空白編輯區域,複製貼上下面的所有內容;
第五步:按F5,執行該VBA命令;密碼就現形了。
Sub Password()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
第六步:切換“審閱”選項卡,點選“撤消工作表保護”,然後輸入密碼即可解除鎖定。
二、軟體破解法
有許多專門為破解Excel各種密碼而製作的軟體,Excel Key與Advanced Office Password Recovery就是其中的佼佼者。它們的使用方法簡單且破解速度極快。
1. Excel Key
下載(下載地址:http://www.mydown.com/soft/183/183131.html)安裝完後執行軟體,點選工具欄“Recovery”按鈕,找到要破解的檔案,軟體馬上就可以解出密碼了(圖5)。
2. Advanced Office Password Recovery
下載(下載地址:http://www.mydown.com/soft/utilitie/security/268/410768.shtml)安裝完後執行軟體,點選工具欄“Open File”按鈕,開啟要破解的Excel檔案,馬上就可以看到解出的密碼了(圖6)。
可以看出,用以上方法讀出的密碼完全不同,但它們確實均可以解除該工作表的密碼保護,這實在是個有趣的問題。
在網上查找了許久,終於找到比較圓滿的解釋答案:
當Excel工作表採用密碼保護時,就會生成一個16位(雙位元組)長hash值。當輸入密碼進行驗證時,真正進行比較的就是這個hash值。事實上,有很多不同的密碼都可以生成同樣的hash值。
大家可以試試:
當你用“test”(不含雙引號)作為Excel工作表保護密碼,你同樣可以用“zzyw”(同樣不含雙引號)這個密碼進行解鎖。怎麼樣,神奇吧?
Excel彈出“您試圖更改的單元格或圖表受保護,因而是隻讀的。若要修改受保護單元格或圖表,請先使用‘撤消工作表保護’命令(在‘審閱’選項卡的‘更改’組中)來取消保護。可能會提示您輸入密碼。
出現這種情況,應該怎麼解決呢?經過研究,找到了兩種破解Excel工作表保護碼的方法。
一、VBA巨集程式碼破解法:
第一步:開啟該檔案
第二步:按Alt+F11,進入VBA編輯介面;
第三步:插入一個Module;
第四步:在右邊Module的空白編輯區域,複製貼上下面的所有內容;
第五步:按F5,執行該VBA命令;密碼就現形了。
Sub Password()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
第六步:切換“審閱”選項卡,點選“撤消工作表保護”,然後輸入密碼即可解除鎖定。
二、軟體破解法
有許多專門為破解Excel各種密碼而製作的軟體,Excel Key與Advanced Office Password Recovery就是其中的佼佼者。它們的使用方法簡單且破解速度極快。
1. Excel Key
下載(下載地址:http://www.mydown.com/soft/183/183131.html)安裝完後執行軟體,點選工具欄“Recovery”按鈕,找到要破解的檔案,軟體馬上就可以解出密碼了(圖5)。
2. Advanced Office Password Recovery
下載(下載地址:http://www.mydown.com/soft/utilitie/security/268/410768.shtml)安裝完後執行軟體,點選工具欄“Open File”按鈕,開啟要破解的Excel檔案,馬上就可以看到解出的密碼了(圖6)。
可以看出,用以上方法讀出的密碼完全不同,但它們確實均可以解除該工作表的密碼保護,這實在是個有趣的問題。
在網上查找了許久,終於找到比較圓滿的解釋答案:
當Excel工作表採用密碼保護時,就會生成一個16位(雙位元組)長hash值。當輸入密碼進行驗證時,真正進行比較的就是這個hash值。事實上,有很多不同的密碼都可以生成同樣的hash值。
大家可以試試:
當你用“test”(不含雙引號)作為Excel工作表保護密碼,你同樣可以用“zzyw”(同樣不含雙引號)這個密碼進行解鎖。怎麼樣,神奇吧?