vba打开受保护的excel(取消vba模块保护)

1. 取消vba模块保护

当然会出错：

因为你加密了VBA工程，而加密的VBA工程的里的代码就会被保护。

也就是说VBA工程加密后，不可以增加删除代码，不可以增加删除窗体，不可以增加删除模块和类模块。而你的代码中：

Set usForm =ThisWorkbook.VBProject.VBComponents.Add(vbext_ct_MSForm)这个是增加一个窗体，这对受保护的工程来说是不被允许的。除了你这个，还有例如ThisWorkbook.VBProject.VBComponents.Remove XXXXX（删除代码）

ThisWorkbook.VBProject.VBComponents.Add(vbext_ct_StdModule).Name = "模块1"(增加模块）

等等都是不可以的。

如果你即要加密VBA工程，又想让程序在运行过程中去新增窗体，建议可以考虑一下sendkey方法，在程序开始运行时执行sendkey解锁工程密码。你可以试试代码：（在我电脑上测试了是可以输入或增加工程密码的）

你可以在你增加窗体的那句代码前先执行inputpw()解锁工程密码。

Sub inputpw() '输入密码解锁 Dim pw$ pw = "password" If ThisWorkbook.VBProject.Protection = vbext_pp_locked Then '判断工程是否解锁 '打开VBAProject工程属性 Application.VBE.CommandBars(1).Controls("工具(T)").Controls("VBAProject 属性(&E)...").Execute Application.SendKeys pw '输入密码 Application.SendKeys "{ENTER}" 'enter解锁 End If End If End Sub Sub addpw() '加工程密码 Dim pw$ pw = "password" If ThisWorkbook.VBProject.Protection = vbext_pp_none Then '判断是否加密码工程 '打开VBAProject工程属性 Application.VBE.CommandBars(1).Controls("工具(T)").Controls("VBAProject 属性(&E)...").Execute Application.SendKeys "^+{TAB}" 'ctrl+tab移动到保护 Application.SendKeys "{TAB}" 'tab移动到第一次输密码位置 Application.SendKeys pw '输入密码 Application.SendKeys "{TAB}" 'tab移动到第二次输密码位置 Application.SendKeys pw '输入密码 Application.SendKeys "{ENTER}" 'enter加锁 DoEvents End If End Sub

2. vba删除模块

过程相当于函数，是由代码组成；模块是放过程及自定义函数的代码的地方；类是创建自己的对象的过程（不一定贴切的说法）；类模板就是放类的代码的地方。——理论问题难以回答，大致如此。

3. vba单元格保护

在缺省方式下，所有的单元格都是处于锁定状态的，这意味着你只要保持工作，所有的单元格都不再能被修改。頭條萊垍

但实际操作中，我们需要让用户输入内容的单元格应该是比较才的，所以，只需要选定那些单元格，解出锁定标志就行了。萊垍頭條

如果要解除某几行，或者某几列，选选中这几行，再“单元格格式设置”，把锁定标志去掉就行了如果要解除整张表的单元格锁定，则先需要选中整张表（就是在A的左边1的上边那个地方单击），再“单元格格式设置”，把锁定标志去掉如果想一次性地解除事个工作薄中各表的单元格锁定，那就需要用一段VBA程序来实现。不过，我想这种需要通过是很少的，如果需要这样做，可以找我。 萊垍頭條

4. vba 工作表取消保护

可以用VBA做一段代码假设您的工作簿中有10个工作表Sub 批量保护工作表()'假设有10个工作表For i = 1 To 10 Sheets(i).ProtectNextEnd SubSub 批量解除保护工作表()'假设有10个工作表For i = 1 To 10 Sheets(i).UnprotectNextEnd Sub

5. vba设置保护工作表及允许编辑内容

工作表的保护是使工作表不能修改 但是任然可以看到

你想要这个表格不被别人看到 可以设置打开密码

工具 选项 安全性 设置打开密码

6. VBA代码保护

在VBA窗口，右键工作薄或者工作表名选择VBAProject属性，第二个选项卡“保护”，输入密码就可以对工程代码加密了

7. vba代码怎么取消对模块的保护

1、打开excel软件，点击左上角“文件”；

2、点击选项；

3、在excel选项界面点击自定义功能区，勾选开发工具，点击确定；

4、开启开发工具后就可以在主菜单上看到开发工具选项卡了，需要打开VBA就在开发工具选项卡点击visual basic即可；

5、写一个简单代码，在VBA窗口选择插入-模块，新建一个模块。点击模块1，在右边编辑框输入代码；

6、代码编写完成后，在Excel界面上点击开发工具--宏--选择名字a--执行，即可执行a代码；运行完成后，A1的内就变成了“这是我的第一个代码”。

8. 取消vba模块保护模式

1、取消所有单元格的“锁定”格式

CTRL+A，选中全部的单元格→单击右键→设置单元格格式→保护→取消勾选锁定

2、选中指定单元格（需要锁定的单元格）→单击右键→设置单元格格式→保护→勾选锁定

3、点击“审阅”→保护⼯作表→下⾯的复选框全部选择→确定→输⼊密码→再次输⼊密码即可

9. 取消vba模块保护功能

办法1：vba代码直接打在workbook上面办法2：worksheet右击insert module，打在模块里，直接也是应用于当前工作簿办法3：打代码时始终加一句worksheets(当前名称）指定一下

10. 取消vba模块保护的命令

本来就有个锁定审阅中有个保护工作簿。

11. vba取消密码保护

Excel是一个专门用于整理数据的电子表格，为了保障表格的安全，用户可以为文档进行加密，可以设置以下类型密码：打开密码、编辑密码、工作表密码、共享账簿密码以及VBA密码。

1、使用宏代码，这种方法比较专业，不具有普遍的适用性；

2、使用专业的第三方密码破解工具，这个可以广泛被使用，传播比较广泛的是AdvancedOfficePasswordRecovery，使用软件打开Excel文档，程序会自动开始破解VBA密码的操作，一旦破解成功，用户可以更改Excel文档的VBA密码，重新获取权限。

顶一下

(0)

0%

踩一下

(0)

0%