专栏名称: 完美Excel

Excel与VBA技术学习与实践

目录

相关文章推荐

完美Excel · 绘制箭头图 · 4 天前

Excel之家ExcelHome · 化繁为简的动态数组公式 · 3 天前

Excel之家ExcelHome · CSV文件的正确打开方式 · 5 天前

Excel之家ExcelHome · 这些公式用不好，天天加班做报表 · 5 天前

Excel之家ExcelHome · 这几个Excel函数公式，简单又高效 · 6 天前

51好读 › 专栏 › 完美Excel

处理使用密码保护工作表的VBA代码

完美Excel · 公众号 · Excel · 2024-11-21 05:36

正文

学习Excel技术，关注微信公众号：

excelperfect

标签：VBA

使用VBA，可以方便地设置使用密码保护工作表，也可以方便地撤销密码工作表保护。

下面两个简单的VBA过程能够容易地保护工作簿中所有工作表，以及撤销工作簿中所有受保护的工作表。

VBA过程代码如下：

'使用密码来保护工作簿中所有工作表Sub ProtectAllSheets()   Dim strPW As String   Dim wks As Worksheet   strPW = "excelperfect"   For Each wks In Worksheets       wks.Protect Password:=strPW   Next wks   Set wks = NothingEnd Sub

'撤销工作簿中所有受保护的工作表Sub UnprotectAllSheets()   Dim strPW As String   Dim wks As Worksheet   strPW = "excelperfect"   For Each wks In Worksheets       wks.Unprotect Password:=strPW   Next wks   Set wks = NothingEnd Sub

但要注意，Excel中的密码非常脆弱，很容易破解，但在一般情况下它们还是会起到一定的作用，防止用户做一些不应该的操作。上述两个过程都是使用文本作为密码，你可以将其修改为你想要使用的密码。

欢迎在下面留言，完善本文内容，让更多的人学到更完美的知识。

欢迎到知识星球：完美Excel社群，进行技术交流和提问，获取更多电子资料，并通过社群加入专门的微信讨论群，更方便交流。

推荐文章

完美Excel · 绘制箭头图

4 天前

Excel之家ExcelHome · 化繁为简的动态数组公式

3 天前

Excel之家ExcelHome · CSV文件的正确打开方式

5 天前

Excel之家ExcelHome · 这些公式用不好，天天加班做报表

5 天前

Excel之家ExcelHome · 这几个Excel函数公式，简单又高效

6 天前

河北交通广播 · 【992 | 治污】石家庄39家“涉气”违规企业被责令整改！

7 年前

品玩 · 当人工智能比人更懂得如何赚钱时，金融家们都开始害怕了

7 年前

哈尔滨日报 · 兆麟公园老树上，又来了鹤，仙鹤……

7 年前

看见音乐 · 今天你Freestyle了吗？

7 年前

再深一点 · 等了363天，这六个男人一出现就又让我在大晚上笑成傻逼

7 年前

Sov5搜索 · 小百科 · 移动版

51好读 - 好文章就要读起来!