當前位置：首頁 > 教育 > 正文

Excel各種密碼解鎖姿勢（收藏備用）

Excel加密破解

日常工作中，經常會遇到加密工作簿或者工作表忘記密碼的情況，今天，我們就介紹一下excel常見加密類型，以及常用解決辦法。

關于Excel方面的密碼大緻可以分為以下三種類型

01

 工作薄打開密碼、工作薄保護密碼

1.1工作簿保護密碼

Excel工作簿保護後（審閱 - 保護工作簿）

保護後，工作表無法插入、删除和取消隐藏等操作。

解密方法：

在上圖工作表标簽右鍵菜單中點擊"查看代碼“打開一個新的窗口(Visual  baisc  編輯器)，插入-模塊，然後把下面的代碼粘貼到右側的空白窗口。

代碼 請輸入内容

 Sub test()

 ActiveWorkbook.Sheets.Copy

 For Each sh In ActiveWorkbook.Sheets

 sh.Visible = True

 Next

 End Sub

把光标放在代碼中，點工具欄中的運行按鈕，運行上面代碼後，會把原文件另存為一個新的Excel文件，這時隻需要重新保存即可。工作簿密碼在新文件中已取消。

1.2工作簿打開密碼

加密方法：文件-信息-保護工作簿（13版本）

加密過的工作簿，打開時候，隻有輸入密碼才能看到工作簿内容。

破解方法：軟件破解 Accent OFFICE Password Recovery

這個軟件，我在網上找了好久，找到一個免費可用版！

窮舉破解，最慢，密碼越簡單越好破解。

鍊接：https://pan.baidu.com/s/1dG7TaUl密碼：azc5

02

  工作表保護密碼

寫保護方法：Excel工作簿保護後（審閱 - 保護工作表）

破解方法：

軟件破解 Accent OFFICE Password Recovery

秒破！（成功率90%以上）

可能給出的密碼和實際的密碼不一緻（編碼問題），但是填入以後，絕對能解除密碼。

03

  VBAProject工程密碼

加密方法：VBE工具-- VBAProject工程屬性

加密過保存以後，再打開vbe界面查看代碼時，就出現以下提示。

解密方法：

将如下代碼寫入任意excel模塊運行即可破解：（成功率90）

Private Sub VBAPassword2()

'你要解保護的Excel文件路徑

Filename = Application.GetOpenFilename("Excel文件（*.xls & *.xla & *.xlt）,*.xls;*.xla;*.xlt", , "VBA破解")

If Dir(Filename) = "" Then

MsgBox "沒找到相關文件,清重新設置。"

Exit Sub

Else

FileCopy Filename, Filename & ".bak" '備份文件。

End If

Dim GetData As String * 5

Open Filename For Binary As #1

Dim CMGs As Long

Dim DPBo As Long

For i = 1 To LOF(1)

Get #1, i, GetData

If GetData = "CMG=""" Then CMGs = i

If GetData = "[Host" Then DPBo = i - 2: Exit For

Next

If CMGs = 0 Then

MsgBox "請先對VBA編碼設置一個保護密碼...", 32, "提示"

Exit Sub

End If

Dim St As String * 2

Dim s20 As String * 1

'取得一個0D0A十六進制字串

Get #1, CMGs - 2, St

'取得一個20十六制字串

Get #1, DPBo + 16, s20

'替換加密部份機碼

For i = CMGs To DPBo Step 2

Put #1, i, St

Next

'加入不配對符号

If (DPBo - CMGs) Mod 2 <> 0 Then

Put #1, DPBo + 1, s20

End If

MsgBox "文件解密成功......", 32, "提示"

Close #1

End Sub

你可能想看：

Excel VBA 7.19 Excel跨工作薄多工作表數據合并之Excel表格多行表頭

所以我們今天針對多行表頭的數據彙總來分析下方法場景模拟假設我們要統計的Excel中每個表格都有表頭，1) End If Next sth End If ActiveWorkbook.Close Fal...

Excel技巧應用篇：【上班族必看】Excel 基礎技巧輕松學，善用 Excel 提升工作效率

利用折線圖繪制實際成績／預測圖表，利用時間軸呈現值的趨勢的「折線圖」，折線圖能清楚呈現「數據的變化」。折線圖是依照「數年、數月、數日這種時間軸來觀察值的變化」的圖表。是無法繪制出具有意義的折線圖。此為...

Excel教程：excel字符串函數--SUBSTITUTE函數和REPLACE函數講解

請在C列輸入公式，将B列的憑證字号，修改為C列所示的内容。您會寫公式嗎，C2單元格輸入下面任意一個公式。=SUBSTITUTE(B2？=REPLACE(B2,上面兩個函數的語法，請參考下面的介紹：SU...

65個excel操作教程大全，新手很容易上手，建議收藏備用

可以看看本文提供的Excel表格操作技巧彙總詳細教程。1、為excel文件添加打開密碼：按ctrl或shift鍵選取多個要打開的excel文件”10、把A.xlsx文件圖标顯示為圖片形式“4、隐藏ex...

收藏備用！年終個稅籌劃、收款收據、開支Excel模闆

搜索Excel不加班曆史文章的方法今天分享幾個經常會用到的模闆，1.收款收據金額自動生成在設置收款收據Excel模闆。金額支持正負數,LEFT(RIGHT(" ￥"&,03合計金額小寫;合計金額...

我整理了Excel中求和的7種方法，趕快收藏備用吧

=SUM($B$2：三、SUM函數:=SUM(C3，SUMIFS函數（點擊鍊接查看SUMIFS函數具體用法）,=SUMIF($B$2。=SUMIFS($C$2”SUMPRODUCT函數:=SUMPRO...

9個Excel必學函數，讓你工作效率翻倍！（收藏備用）

=IF(A2=$G$2,滿足條件返回的值),=IF(A2="小孩子":COUNTIFS和COUNTIF兩個都是條件計數:支持單條件和多條件:=COUNTIFS(條件區域1,=COUNTIFS(A，A:...

辦公室必備的14個Excel函數，如果還不掌握就真的Out了，收藏備用

例如計算員工的年齡、判斷是否重複、統計重複的次數……等等，根據指定的格式統計兩個日期之間的差值。參數結束日期為Today的目的在于保持年齡的自動更新。二、判斷指定的值是否重複，重複意味着指定值的數量＞...

九類Excel多條件公式大全，工作再忙也要看，強烈建議你收藏備用！

$B:$B$20=$F2)*($C$2:$B$20。$C$20=G$1)),$B：$G2:=SUMPRODUCT(($B$2:$C$20=C2)*($D$2:公式2 =MAX(($B$2:$C$20=...

《Excel2003入門動畫教程27、Excel拆分表格》

《Excel2003入門動畫教程27、Excel拆分表格》。　　演示動畫，　　操作步驟，　　有時候在Excel中：們需要比較浏覽同一工作表中不同區域的數據時，可以通過折分窗口來實現“　　選中窗口中部的...

Excel 中Alt鍵的高手用法 Excel必學技巧

即可一鍵生成柱形圖，Alt加Enter（回車鍵）單元格内強制換行五、Alt加數字鍵輸入符号 (需要在帶有小鍵盤的電腦上操作哦）Alt加41446輸入溫度符号Alt加41409輸入錯号Alt加41420...

VS2010操作Excel2010，報錯解決及讀寫excel

加到模塊std中:#include "CWorksheet.h";#include "CRange.h":5、将以上頭文件的#import "C;\\Program Files\\Microsoft ...

Excel教程：30秒做好Excel超鍊接目錄

工作表前面插入一張空白工作表Sheet。點擊右鍵，查看代碼會激活VBE編輯器界面，點擊插入——模塊，并且複制以下代碼到右邊編輯區。"選擇目錄起始單元格",Excel提示我們是否VB項目，選擇文件保存類...

Excel教程：查找替換功能妙用，一列轉多行多列，超好用的Excel技巧！

Excel中普通的查找替換，今天我們巧妙借用查找替換功能，節約打印用紙，将一列數據轉成多行多列的數據再打印，将A列的數據，然後C3單元格輸入A7，右拉到G3單元格。這樣做的目的是先把A列數據需要的行和...

Excel教程：excel核對名單，使用if函數和countif嵌套使用快速完成

Excel中數據核對的方法和場景有很多。下面的Excel表格，需要在B列快速核對是否漲薪。将A列的名單，在G列裡面去查找核對，在B3單元格寫一個函數公式得到下面的結果。查找A列裡面的姓名，是否在G列名...

Excel教程：excel添加序号，10000個序号，隻需2秒！

Excel添加序号，下面的Excel表格，需要在A列批量自動添加序号：當有增加或者删除行的時候”序号會得到自動更新，在A2單元格寫一個函數公式，寫公式的時候，就是返回當前單元格的行号。比如A1輸入ro...

Excel教程：如何計算退休時間，一個公式搞定Excel退休提醒

比如下面的Excel表格，在D列計算退休時間。參考下面的Excel表格。我們使用IF函數結合DEATE函數進行嵌套完成。IF函數分三種情況做判斷。在D2單元格輸入下面的公式：12*50)))上面使用到...

Excel教程：超實用的Excel到期自動提醒，比鬧鐘還好用！

下面的Excel表格，D列呈現了應收日期。現在需要提前一周聯系公司進行尾款催收，将D列一周以内的日期進行标識，符合條件的單元格，就填充綠色背景進行提醒。TODAY函數，比如任意單元格輸入公式：=TOD...

Excel教程：excel排名公式案例，這樣寫，才是最好最合理的排名方式

Excel的排名有很多種，我們今天以一個案例來為大家分享Excel排名公式該如何寫。現在需要在C列進行排名。排名效果如下表所示。B$14,B$14))公式解析：中國式排名最大特點就是并列排名不影響名次...

Excel教程：快速填充技巧和excel數據提取公式分享

使用函數公式和快速填充兩種方法完成哦，快速填充方法使用Ctrl+E快速填充。可以實現中文和字母提取，B2單元格輸入，選擇C2單元格輸入英文，C3、C4單元格也做同樣的操作，為什麼C列要連續輸入前面3個...

條款密碼文件代碼方法

上一篇
系統小技巧：應急啟動磁盤管理器

下一篇
2021祝大家中秋節快樂美圖，中秋節表情包動态圖片大全！

有話要說...

最新文章

取消
掃碼支持 支付碼