黑基网 首页 学院 电脑技术 查看内容

VBA代码破解工作表密码保护

2017-7-5 00:46| 投稿: xiaotiger |来自: 互联网

摘要: 昨天给大家分享了怎么利用修改后缀名破解工作表保护,但是还是有很多同学操作后不能实现效果,那么今天给大家分享一段VBA代码来破解工作表保护。 代码:Sub 破解() ActiveSheet.Protect DrawingObjects:=True, CONTE ...

昨天给大家分享了怎么利用修改后缀名破解工作表保护,但是还是有很多同学操作后不能实现效果,那么今天给大家分享一段VBA代码来破解工作表保护。


代码:

Sub 破解()

ActiveSheet.Protect DrawingObjects:=True, CONTENTS:=True, AllowFiltering:=True

ActiveSheet.Protect DrawingObjects:=False, CONTENTS:=True, AllowFiltering:=True

ActiveSheet.Unprotect

End Sub

  1. 复制上方代码来到开发工具选项卡(没有开发工具选项卡的同学,在文件-选项-自定义功能区调出来)

2. 然后点击Visual Basic 进入代码窗口 (或者按快捷键 ALT+F11)

3. 在插入选项卡插入一个模块,然后把刚才复制的代码粘贴到模块里

4. 选中所保护的工作表任意单元格,点击模块上方的运行-运行子过程(或者按F5运行代码)

5. 之后会弹出输入密码的对话框,点击取消 就破解工作表保护了

整体效果:

小编推荐:欲学习电脑技术、系统维护、网络管理、编程开发和安全攻防等高端IT技术,请 点击这里 注册黑基账号,公开课频道价值万元IT培训教程免费学,让您少走弯路、事半功倍,好工作升职加薪!

本文出自:http://www.toutiao.com/a6438854165842313473/

免责声明:本文由投稿者转载自互联网,版权归原作者所有,文中所述不代表本站观点,若有侵权或转载等不当之处请联系我们处理,让我们一起为维护良好的互联网秩序而努力!联系方式见网站首页右下角。


鲜花

握手

雷人

路过

鸡蛋

相关阅读

最新评论


新出炉

返回顶部