新開(kāi)一Excel，同時(shí)按Alt+F11，進(jìn)入VBA界面，點(diǎn)菜單上的插入，模塊，在新出來(lái)的窗口粘貼一下代碼：

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

然后在當(dāng)前界面，按F5運(yùn)行此宏，然后選擇文件加密需要破解的EXCEL開(kāi)始進(jìn)行破解，這個(gè)破解速度是看你的密碼對(duì)的長(zhǎng)度、復(fù)雜程度、電腦配置。小編測(cè)試的一個(gè)【12】，是秒破。

?

總結(jié)

以上是生活随笔為你收集整理的【WIN】超简单的Excel密码破解的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。