如何给你电脑中的所有Excel文件加密

给你电脑中的所有Excel文件加密大家的电脑里可能有很多Excel表格的内容是不希望其他人看到的。那么我们怎么让电脑中每一个Excel文件在打开时都需要输入密码呢。只需进行如下几步，轻松实现。

1、新建一个Excel工作簿，并打开。

2、ATL+F11打开VBA编辑器。

3、在左边当前文件的任意sheet点击右键-插入-模块。

4、在右边的编辑窗口输入如下代码：

Sub auto_open()

Dim i As Integer

For i = 1 To 3

Dim password As String

password = InputBox("请输入密码")

If password = "kelvin" Then ‘这里的kelvin就是你自己选择的密码

MsgBox "欢迎"

Exit For

ElseIf i < 3 Then

MsgBox "请输入正确密码，你还有" & 3 - i & "

次输入机会！"

Else

MsgBox "错误，系统即将关闭"

Application.Quit

End If

Next

End Sub

5、回到我们的Excel视图，点击文件-另存为*.xlsm文件。

6、把另存好的好的文件放入

C:\Users\Administrator\AppData\Roaming\Microsoft\Excel\X

LSTART文件夹中。

7、关闭所有Excel文件。现在已经完成了，打开任意Excel文

件试试。

当然，知道这个办法的人还是可以通过把刚才我们做的文件删了来使我们的密码失效。如果要加强安全性，可以把我们的文件伪装一下，比如将其改为以SYS为后缀名的系统文件；比如在C:\Users\Administrator\AppData\Roaming\Microsoft\Excel\XLSTART文件夹中添加很多其他文件；比如把整个AppData文件夹都隐藏了；等

等。。。