Excl2016密码忘记 破解办法

EXCL 2016 破解密码

作为一个IT从业者，大多数人都会遇到各种密码忘记得客户，那么接下来我们先说一种EXCL文件密码破解。

VBA破解

这是一个测试的excl文本，双机打开的时候发现被加密了，密码也忘记了。
1111##

1. 第一步 新建一个excl文本
   

2. 第二步同时按住ALT和F11进入VBA (如下图)
   

3. 第三部点击插入，模块
   

4. 第四部将代码复制进去
   ###代码在底下
   
   

5. 点击运行
   
   

6. 第六步在弹出的对话框中选择需要打开的excl，等待破解就行了

##代码如下 代码片.

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

######到这里破解步骤就结束了，本人QQ481715271
顺便问一句 有没有公司要招IT 定位合肥！！！