快好知快好知 kuaihz订阅看过栏目系统

找词 找站 信使 
  

「ExcelVBA」一键取消所有工作表密码

作者:涂大荣。

「Excel VBA」一键取消所有工作表密码

今天的内容

下记工作簿中,有3个工作表,每个工作表都设置了保护密码。工作表不多,可以逐个解锁,修改表格。但如果工作表很多,需要逐个输入密码解密,很费事。亦或者忘记了工作表保护密码,无法解锁工作表保护修改文档,怎么办呢?别担心,福利来了。

今天涂涂给大家分享一段VBA小代码,无需解锁密码,一键移除所有工作表的保护密码

❖效果图

 

操作步骤

STEP 01

◆将xlsx后缀的文件,另存为xlsm后缀的文件(xls后缀的文件不需要另存)

◆按Alt F11组合键打开VBE编辑界面

◆新建模块,双击模块,在代码区写入下记代码,保存,关闭VBE界面

代码示例

Sub 一键移除工作表保护密码()

   Dim sht As Worksheet

   For Each sht In Worksheets

       sht.Protect AllowFiltering:=True

       sht.Unprotect

   Next

End Sub

STEP 02

◆返回Excel界面,插入按钮,指定宏,点击按钮即可

※也可不插入按钮,在宏对话框中选择对应的宏代码执行

代码解释

sht.Unprotect

◆Worksheet.Unprotect 方法取消工作表的保护

◆Unprotect()括号内参数可以添加解锁密码密码区分大小写;如果不知道密码,可省略

搜索建议: 一键  一键词条  ExcelVBA  ExcelVBA词条  取消  取消词条  密码  密码词条  所有  所有词条  
办公

 PPT制作小技巧,花2分钟时间让...

2、一键替换字体大家在制作PPT的时候,是不是有些字体是自己打上去的,而有些字体则是通过复制,粘贴进去的?但是呢,这样子会导致这样的情况出现:PPT中的字体并不...(展开)

kuaihz.com