国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

Excel 2003加密文件破解方法

2024-08-23 19:50:50
字體:
來源:轉載
供稿:網友

我們有時候會有一些秘密文件,密碼設置的有不一樣,時間久了就忘記了,有什么辦法或者軟件可以破解呢?下面為大家介一個簡單的密碼破解方法:HE的,6位 以下看密碼難以度,6位以上一本無望。如果Excel文件的打開密碼忘記了,且密碼是6位數以內的數字,可用以下步驟解開(關掉所有程序,為了速度):


新開一Excel,同時按Alt和F11,進入VBA界面,點菜單上的插入,模塊,在新出來的窗口粘貼一下代碼:

Sub crack()

Dim i As Long

Dim FileName As String

i = 0

FileName = application.GetOpenFilename("Excel文件(*.xls & *.xlsx),*.xls;*.xlsx", , "VBA破解")

FileName = Right(FileName, Len(FileName) - InStrRev(FileName, ""))

Application.ScreenUpdating = False

line2: On Error GoTo line1

Workbooks.Open FileName, , True, , i

MsgBox "PassWord is " & i

Exit Sub

line1: i = i + 1

Resume line2

Application.ScreenUpdating = True

End Sub

然后在此界面直接按F5運行此宏,選擇文件,等啊等(看密碼長度了)到網上去下載Excel Cracker.rar 這個文件。


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 洞口县| 句容市| 南平市| 东山县| 秦皇岛市| 桃江县| 叶城县| 临海市| 吉水县| 洛南县| 盐池县| 宁远县| 益阳市| 佛坪县| 河津市| 波密县| 宾阳县| 泰宁县| 上饶市| 辽源市| 随州市| 横峰县| 芜湖县| 陕西省| 五家渠市| 镇远县| 澳门| 丘北县| 宁晋县| 海淀区| 蕲春县| 贵阳市| 深泽县| 佛冈县| 屯留县| 卓尼县| 内丘县| 颍上县| 甘洛县| 瑞昌市| 嘉黎县|