QQ:970097556
扬鞭策马自奋蹄!

清除Excel密码,简单高效

昨天分享的 Excel保护密码破解 方法虽然能得到可使用的密码文本,但多次测试后发现破解效率太低,对于复杂密码还会出现卡死现象。

如果不需要得到密码文本,可使用下述代码将Excel工作表、工作簿的保护密码清除,更加简单高效!

Sub 工作表破解()
    Dim sh As Worksheet
    For Each sh In Worksheets
        sh.Protect AllowFiltering:=True
        sh.Unprotect
    Next
End Sub

Sub 工作簿破解()
    ActiveWorkbook.Sheets.Copy
    For Each sh In ActiveWorkbook.Sheets
        sh.Visible = True
    Next
End Sub

参考:

Excel保护密码破解

ExcelVBA工程密码破解

赞(0) 赞助
未经允许不得转载:渤海琴师 » 清除Excel密码,简单高效

评论 抢沙发

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址

小额赞助琴师,让本站走得更远!

支付宝扫一扫

微信扫一扫