当前位置：首页 > 微软office > Excel > 正文内容

一键破解：工作簿保护和工作表保护

zyhwxm3年前 (2022-07-04)Excel82

小伙伴们好啊，今天咱们说说如何破解工作簿保护和工作表保护的问题。

注意咱们说的工作簿保护，不是文档的打开权限密码，如果设置了文档打开权限密码，在高版本中破解的成功率是非常低的。

如果打开一个Excel文档时，直接弹出这么个对话框，那就基本没指望了，早点洗洗睡吧：

我说的工作簿保护是这里：

在这个地方设置工作簿保护后，将对工作表进行删除、移动、新建、隐藏或者取消隐藏，以及工作表重命名等操作。

如果工作簿保护密码忘记了怎么办？

右键单击工作表标签→【查看代码】，然后插入模块，复制以下代码，粘贴到代码区域：

Sub 工作簿密码破解()    ActiveWorkbook.Sheets.Copy        For Each sh In ActiveWorkbook.Sheets        sh.Visible = True    NextEnd Sub

点击运行按钮，稍等片刻，就会出现一个去掉保护的工作簿克隆版，咱们只要按Ctrl+S键，将这个工作簿保存一下就好了。

接下来咱们再说说如何破解工作表保护。

有时我们为了防止别人修改工作表内容，会通过【审阅】→【保护工作表】来设置工作表的保护密码。

如果不小心自己忘了密码或者别人的文档咱们没有密码，怎么办呢?

只要参考前一个动画中的步骤，右键单击工作表标签→【查看代码】，然后插入模块，复制以下代码，粘贴到代码区域，点一下运行按钮就OK了：

Sub jp()Dim sht As WorksheetFor Each sht In Worksheetssht.Protect AllowFiltering:=Truesht.UnprotectNextEnd Sub

好了，今天咱们的内容就是这些吧，祝各位小伙伴一天好心情！

图文作者：看见星光

本篇文章来源于微信公众号:Excel之家ExcelHome

若有违反您个人权益，请留言反馈删除相关信息；

返回列表

1、将需要合并的文件放在一个文件夹下2、新建一个空白工作簿3、打开空白工作簿，在第一个空白工作表，右键-查看代码4、粘贴下面的代码，点击运行，成功后关闭提示框说明：复制该文件下所有工作簿的所有工作表，到一个工作表里代码如下：Sub 合并目录...

下面是一组常用Excel函数公式的用法，学会这些套路，让工作效率再高一丢丢。1、IF函数条件判断IF函数是最常用的判断类函数之一，能完成非此即彼的判断。如下图，考核得分的标准为9分，要判断B列的考核成绩是否合格。=IF(B4>=9,&...

一、序列填充生成序号适用范围：生成较少的常规序号。在首个单元格内输入数字1，然后按住单元格右下角的填充柄向下拖动，然后在【自动填充选项】中选择【序列填充】。二、直接拖动生成序号适用范围：生成任意步长值的序...

一维区域筛选不重复记录示例26-7 提取客户代表姓名图26-8展示的是某单位销售记录表的部分内容，需要提取不重复的客户代表姓名。1. MATCH函数去重法在F2单元格中输入以下数组公式，按<Ctrl+Shi...

小伙伴们好啊，今天老祝和大家分享一组COUNTIF函数的经典用法。COUNTIF函数主要用于统计满足某个条件的单元格的数量，基本用法为：COUNTIF(统计区域,指定的条件)其中指定的条件可以是数字、文字，或者是一...

TEXT函数是使用频率非常高的文本函数之一，她只有两个参数，参数1是要处理的数字，参数2用于指定格式代码，与单元格数字格式中的大部分代码都基本相同。接下来咱们一起看看TEXT函数的常见用法：1、简单的条件判断下图展...

落地彩虹