国产探花免费观看_亚洲丰满少妇自慰呻吟_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 這個文件。


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 沂南县| 孝义市| 宜君县| 佛坪县| 桃园市| 桐乡市| 五家渠市| 长寿区| 嵊州市| 山东省| 静安区| 当涂县| 乌鲁木齐县| 颍上县| 游戏| 英德市| 南华县| 池州市| 德昌县| 泰顺县| 平武县| 莫力| 凯里市| 图们市| 甘谷县| 法库县| 万盛区| 陇川县| 恩平市| 陆丰市| 福州市| 通道| 进贤县| 林西县| 温州市| 白水县| 旬阳县| 六盘水市| 威信县| 北碚区| 乌拉特前旗|