EXCE如何用VBA代码加入启动时对所有工作表加密,并设指定密码?

Question

如题所述

Answer 1

通过代码对excel代码进行加密即可：

1、打开您需要破解保护密码的Excel文件；

2、依次点击菜单栏上的工具---宏----录制新宏，输入宏名字如:aa；

3、停止录制(这样得到一个空宏)；

4、依次点击菜单栏上的工具---宏----宏,选aa,点编辑按钮；

5、删除窗口中的所有字符(只有几个),替换为下面的内容；

Sub æ·»åŠ å¯†ç ()
Dim x As Integer
For x = 1 To Sheets.Count
Sheets(x).Protect "123"
Next x
hisWorkbook.Protect "123"