最好使用VBA 工程密码破解方法
新建一个excel文档,然后打开,同时按Alt和F11,进入VBA界面
点击菜单上的插入,模块
在新的窗口粘贴以下代码:
1 Sub crack()
2
3 Dim i As Long
4
5 Dim FileName As String
6
7 i = 0
8
9 FileName = Application.GetOpenFilename(“Excel文件(.xls & .xlsx),.xls;.xlsx”, , “VBA破解”)
10
11 FileName = Right(FileName, Len(FileName) - InStrRev(FileName, “”))
12
13 Application.ScreenUpdating = False
14
15 line2: On Error GoTo line1
16
17 Workbooks.Open FileName, , True, , i
18
19 MsgBox "Password is " & i
20
21 Exit Sub
22
23 line1: i = i + 1
24
25 Resume line2
26
27 Application.ScreenUpdating = True
28
29 End Sub
点击运行
在弹出的对话框中选择需要破解的Excel文件,点击打开
等待破解即可
转载于:https://www.cnblogs.com/xyh012138/p/11110769.html