码迷,mamicode.com
首页 > 其他好文 > 详细

Excel工作表密码保护的破解

时间:2017-04-17 14:20:07      阅读:149      评论:0      收藏:0      [点我收藏+]

标签:drawing   protect   raw   ring   style   sheet   cti   单击   visual   


操作步骤:打开Visual Basic编辑器,单击“插入-->模块“,将以下代码粘贴到模块中即可。

Sub DelPassword()

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, AllowFiltering:=True
ActiveSheet.Protect DrawingObjects:=False, Contents:=True, AllowFiltering:=True
ActiveSheet.Unprotect

End Sub

 

Excel工作表密码保护的破解

标签:drawing   protect   raw   ring   style   sheet   cti   单击   visual   

原文地址:http://www.cnblogs.com/yl153/p/6722457.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!