如何解除Excel工作表密碼保護：詳細教學

Excel 密碼解除教學

在工作中，Excel 文件往往因為包含敏感數據或者是重要資訊而被密碼保護。然而，有時候我們可能會忘記密碼而需要解除密碼保護。本文將詳細介紹如何解除 Excel 密碼，包括工作表密碼和工作簿密碼。

解除工作表密碼

如果您只需要解除特定工作表的密碼，可以按照以下步驟進行操作：

1. 打開需要解密的 Excel 文件。
2. 按 Alt + F11 鍵進入 VBA 編輯器。
3. 在 VBA 編輯器中，按 Ctrl + G 進入立即窗口（Immediate Window）。
4. 輸入下面的 VBA 代碼並按下 Enter 鍵：

         Sheets("Sheet1").Unprotect "您的密碼"
       

5. 將 “Sheet1” 替換為您需要解除密碼的工作表名稱，並將 “您的密碼” 替换為實際的密碼。
6. 如果密碼正確，工作表將被解鎖。

解除工作簿密碼

解除工作簿密碼保護涉及更多步驟，但也可以通過 VBA 代碼實現：

1. 打開需要解密的 Excel 文件。
2. 按 Alt + F11 鍵進入 VBA 編輯器。
3. 在 VBA 編輯器中，按 Insert 菜單並選擇 Module，新建一個模塊。
4. 在新建的模塊中輸入以下 VBA 代碼：

         
   Sub PasswordBreaker()
       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
           ActiveWorkbook.Unprotect Chr(i) & Chr(j) & Chr(k) & _
           Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
           Chr(i4) & Chr(i5) & Chr(i6)
           If ActiveWorkbook.ProtectStructure = False Then
               MsgBox "Password is " & Chr(i) & Chr(j) & Chr(k) & _
               Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
               Chr(i4) & Chr(i5) & Chr(i6)
               Exit Sub
           End If
       Next: Next: Next: Next: Next: Next
       Next: Next: Next: Next: Next: Next
   End Sub
         
       

5. 按 F5 鍵運行該模塊。
6. 程序將嘗試通過多種組合解除工作簿的密碼，並在解除成功時顯示密碼。

注意事項

請注意，以上方法僅適用於忘記密碼的情況，不建議用於其他用途。密碼保護是一種重要的安全措施，應該加以保護和尊重，以確保數據的完整性和機密性。

此外，上述 VBA 代碼的方法可能不適用於新版 Excel 中加強了密碼保護的功能。因此，最好備份您的文件並定期更新密碼。若有其他需求，可尋求專業建議或使用合法的第三方工具。