A. 工作表忘記了密碼怎麼辦
1、點擊菜單欄中的「開發工具」，選擇錄制宏，錄制一個名為「清除工作表保護密碼」的宏文件（可以根據自己的習慣命名該宏文件）。
2、再次點擊菜單欄中的「開發工具」，選擇「宏」，打開宏對話框，「宏名」選擇剛剛新建的宏文件，然後點擊「編輯」，打開宏（VBA）編輯窗口。
3、在宏（VBA）編輯窗口的左側依次選擇「VBAProject PERSONAL,XLSB」→「模塊」→「模塊2」後，將右側的代碼窗口中的原有內容刪除後，把以下代碼復制後粘貼在代碼窗口中保存。
4、再次點擊菜單欄中的「開發工具」，選擇「宏」，打開宏對話框，「宏名」選擇剛剛新建的宏文件，然後點擊「執行」或「單步執行」，等程序運行完成後工作表保護密碼就清除了。（提示：程序運行時有點卡，如果電腦配置低就選擇單步執行，效果是一樣的）
VBA代碼如下：
Public Sub 工作表保護密碼破解()
Const HUANHANG As String = vbNewLine & vbNewLine
Const MINGCHEN As String = "清除工作表保護密碼"
Const JINGGAO As String = "該工作簿中的工作表密碼保護已全部清除!!" & HUANHANG & "請記得另保存" _
& HUANHANG & "注意：不要用在不當地方，要尊重他人的勞動成果！"
Const TISHI1 As String = "該文件工作表中沒有加密"
Const TISHI2 As String = "該文件工作表中沒有加密2"
Const KSPJ As String = "解密需花費一定時間,請耐心等候!" & HUANHANG & "按確定開始清除!"
Const FXMM1 As String = "密碼重新組合為:" & HUANHANG & "$$" & HUANHANG & _
"如果該文件工作表有不同密碼,將搜索下一組密碼並修改清除"
Const FXMM2 As String = "密碼重新組合為:" & HUANHANG & "$$" & HUANHANG & _
"如果該文件工作表有不同密碼,將搜索下一組密碼並解除"
Const MSGONLYONE As String = "確保為唯一的?"
Dim w1 As Worksheet, w2 As Worksheet
Dim i As Integer, j As Integer, k As Integer, l As Integer
Dim m As Integer, n As Integer, i1 As Integer, i2 As Integer
Dim i3 As Integer, i4 As Integer, i5 As Integer, i6 As Integer
Dim PWord1 As String
Dim ShTag As Boolean, WinTag As Boolean
Application.ScreenUpdating = False
With ActiveWorkbook
WinTag = .ProtectStructure Or .ProtectWindows
End With
ShTag = False
For Each w1 In Worksheets
ShTag = ShTag Or w1.ProtectContents
Next w1
If Not ShTag And Not WinTag Then
MsgBox TISHI1, vbInformation, MINGCHEN
Exit Sub
End If
MsgBox KSPJ, vbInformation, MINGCHEN
If Not WinTag Then
Else
On Error Resume Next
Do 'mmy do loop
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
With ActiveWorkbook
.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 .ProtectStructure = False And _
.ProtectWindows = False Then
PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
MsgBox Application.Substitute(FXMM1, _
"$$", PWord1), vbInformation, MINGCHEN
Exit Do 'Bypass all for...nexts
End If
End With
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
Loop Until True
On Error GoTo 0
End If
If WinTag And Not ShTag Then
MsgBox MSGONLYONE, vbInformation, MINGCHEN
Exit Sub
End If
On Error Resume Next
For Each w1 In Worksheets
'Attempt clearance with PWord1
w1.Unprotect PWord1
Next w1
On Error GoTo 0
ShTag = False
For Each w1 In Worksheets
'Checks for all clear ShTag triggered to 1 if not.
ShTag = ShTag Or w1.ProtectContents
Next w1
If ShTag Then
For Each w1 In Worksheets
With w1
If .ProtectContents Then
On Error Resume Next
Do 'Dummy do loop
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
.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 Not .ProtectContents Then
PWord1 = Chr(i) & Chr(j) & Chr(k) & Chr(l) & _
Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
MsgBox Application.Substitute(FXMM2, _
"$$", PWord1), vbInformation, MINGCHEN
'leverage finding Pword by trying on other sheets
For Each w2 In Worksheets
w2.Unprotect PWord1
Next w2
Exit Do 'Bypass all for...nexts
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
Loop Until True
On Error GoTo 0
End If
End With
Next w1
End If
MsgBox JINGGAO, vbInformation, MINGCHEN
End Sub
B. excel文件密碼忘記了怎麼辦 excel文檔密碼破解方法匯總
大家是不是還以為Excel密碼破解是幾乎做不到的事情？但事實剛好相反，藉助Excel密碼破解工具，Excel密碼破解只需幾秒鍾的事情。
小編只為告訴大家一個簡單的事實，Excel密碼破解真的很簡單。
強悍的Excel密碼破解工具
與其說是Excel密碼破解工具，不如說是Office文檔密碼破解工具更適合，因為這些Office密碼破解工具都無一例外支持Word、Excel、PPT文檔破解。我們先來看看有哪四大Excel密碼破解工具吧。
4大破解工具
1、Accent OFFICE Password Recovery
特點：成功破解過的密碼都會被記錄下來用作下一次破解，破解已經破解過文檔不費吹灰之力。
2、Office Password Remover
特點：在線秒殺所有採用普通加密方式的「.doc」、「.xls」、「.ppt」文檔。
缺點：付款才能看到完整的被破解的文檔，必須上網才能用。
3、Advanced Office Password Recovery
特點：功能無比強大，如果上面兩款都破解不了，這款是最終武器。
4、Office Password Unlocker
特點：由於前三款Excel密碼破解工具已經夠用，這款功能其實也不差，但對筆者而言是湊數用。
方法：
先用Microsoft Office Excel 2003（可用金山WPS Office 2012 表格代替）創建一個「2003.xls」的普通方式加密Excel文檔，然後用Office Password Remover這個在線破解工具來破解，1,2,3，3秒之後，就生產一個已經被成功破解的新Excel文檔——2003（DEMO）.xls 。破解一個普通加密方式的Excel文檔，只需3秒鍾！如果你真的不信，可以自己測試一下！
3秒鍾的事
當然，這個3秒破解Excel文檔密碼是有條件的。第一個條件：Excel文檔保存格式必須為古老的「.XLS 」格式（同理，Word文檔保存為「.DOC」格式，PPT文檔為「.PPT格式」），第二個條件為加密方式必須為Office 2003或2007（WPS Office 2012）的默認加密方式。
註：要想得到完全的破解文件，需要付費，免費破解的Excel文檔只能看到前幾行。
Excel密碼破解工具一秒能測試多少個密碼？
如果不付費就破解不了，那就大錯特錯。要知道，在一台普通配置的電腦上，Excel密碼破解工具一秒能測試約88萬個密碼（需符合以上兩個條件）。假設一個6位數的全數字密碼，你猜要多長時間來破解？答案是2秒不到（破解時間因測試環境不同而不同）。
Excel密碼破解工具一秒能測試約88萬個密碼
WPS表格（用途相當於Excel）雖然提供多種加密方式，但其中的XOR加密方式在Advanced Office Password Recovery里就形成虛設。可能是Advanced Office Password Recovery已經掌握了怎麼完美破解XOR加密方式的方法，否則不可能做到無論你設置什麼密碼，都會被瞬間打開！
小編在此強調一下，這不代表WPS Office 2012 的加密方式不行，只是想說明，Excel加密要選對加密方式才靠譜，後面就是詳細講解這個。
總結：從另一個角度探討看XOR加密方式，XOR加密方式雖然可以被 Advanced Office Password Recovery 瞬間破解，但卻完全不怕Office Password Remover的在線破解。因為Office Password Remover對XOR加密方式的Office 文檔無可奈何。如果有人想找隨時找回密碼的加密方式，那WPS內置的XOR加密毫無疑問是最適合的方式。
C. Excel文件忘記密碼怎麼辦
1.開啟excel文件點擊撤銷工作簿保護時忘記密碼的情況,
2.這時就可以右鍵文件,開啟右鍵菜單列表,
3.點擊重命名把文件後綴改成rar,
4.改成完rar使用壓縮應用打開這個rar文件,
5.然後打開xl目錄下的worksheets文件夾,
D. excel忘記密碼怎麼找回和打開
可以通過以下方法進行破解，步驟如下：
1，先找到有工作表保護密碼的Excel表格，然後後綴名稱，從演示操作表格.xlsx改為演示操作表格.rar：
E. excel文檔密碼忘了怎麼辦
經常和辦公軟體打交道的人肯定知道,如果把加密文檔的密碼忘了就相當於將這個文件報廢了,那將會是一件多麼可怕的事情。今天為大家介紹一款軟體,可以在極短的時間里輕松破解word和excel文件的密碼,它就是office
password
remover。
office
password
remover破解密碼的速度很快,使用時需要連接到互聯網,因為要給軟體伺服器發送很少的數據並解密。不過大家可以放心,該軟體不會泄露任何個人隱私。
第一步:首先運行解壓好的opremove.exe
這個程序,打開程序後可以看到中間文本框後面有個類似文件夾的按鈕。
另外,為了防止別人用該軟體來破解word或excel文檔,也可以給該程序設置密碼。點擊「文件」菜單中的「設置訪問密碼」命令,然後在彈出的「設置訪問密碼」窗口在輸入兩遍登錄密碼即可。下次再運行該程序時,就會出現提示要求輸入運行程序密碼的窗口。
第二步:接著點擊該按鈕瀏覽打開要破解的word或excel文檔。確定後出現如圖的畫面,點擊「移除密碼」按鈕後。這時程序會彈出一個提示窗口,說明程序要連接互聯網來查找匹配的秘密才能進行破解,確定後就開始破解操作。
第三步:幾秒鍾後,便出現「該文檔已經被成功破解」的提示,點擊「確定」按鈕即可,這個時候文件破解就大功告成了。在這里要特別注意的是,破解後的文件名會有點變化,加了「demo」這四個字母,我們只要重命名去掉這四個字母就可以了。
F. Excel文件忘記密碼怎麼辦
可以通過以下步驟解除Excel加密密碼：
所需材料：Excel、記事本、解壓軟體。
一、首先點擊選中被加密的表格文檔，按F2重命名，把文件格式改為RAR。
G. 表格忘記密碼了怎麼辦
1.新建一個測試表格為例,添加工作表保護密碼
2.保存文件,在右鍵打開方式選擇用壓縮軟體打開
3.打開壓縮包依次點擊xl→Worksheets,然後把文件sheet1.xml 拖出來
4.拖出來的sheet1文件右鍵使用記事本打開
5.按Ctrl+F,查找「protect」
6.定位到「<sheetProtection password="C71F" sheet="1" objects="1" scenarios="1"/>」這個句子，將它刪除，保存文件
7.再次重復第2至第3步，將修改過的sheet1文件拉回到原先所在的文件，替換掉裡面的文件
8.關閉壓縮軟體，重新打開測試文件，密碼已清除，可以編輯了