一段简单的VBA代码,让你自如操作Excel!

抛砖引玉的场景需求:批量解除工作簿中所有工作表的保护设置!

excel打开vba模块如何设置密码(一小段ExcelVBA代码012批量解除工作表密码保护)(1)

代码示例

在标准模块中加入如下代码即可实现上面的演示功能。

Sub 批量解除保护工作表() For x = 1 To Worksheets.Count Worksheets(x).Unprotect Next End Sub

上面的代码是针对没有设置密码保护的工作表。如果工作表有固定密码,比如密码为123:就可以这样写:

Sub 批量解除保护工作表() For x = 1 To Worksheets.Count Worksheets(x).Unprotect Password:=123 Next End Sub

动手试一试,屏幕前的你, 复制代码运行下吧~~!

更多Excel VBA编程知识(职场牛人的必备秘技),可下载安装使用一款优秀职场人必备的工具《神奇的VBA》插件,一款嵌入进Excel Ribbon界面,打开任意Excel工作簿就能随时查阅学习VBA编程的Excel 插件。

插件下载地址戳下面链接:

《神奇的VBA》-职场牛人都在使用的Excel插件

excel打开vba模块如何设置密码(一小段ExcelVBA代码012批量解除工作表密码保护)(2)

《神奇的VBA》选项卡样式

excel打开vba模块如何设置密码(一小段ExcelVBA代码012批量解除工作表密码保护)(3)

神奇的VBA使用演示图

,