-
Excel密码容易被别人，有什么更好的保护方法吗？感谢悟空小秘的邀请！
Excel密码容易被别人，有什么更好的保护方法吗？
实际上新版EXCEL的密码保护很难，如果不放心可以用第三方的加密工具。
如果只用EXCEL功能的话，可以多加几重密码保护。
第一，设置打开密码和修改密码。
如图在EXCEL保存对话框中，点工具，常规选项：
输入打开密码和修改密码就可以：
第二，设置保护工作表和工作薄密码。
可以在文件，信息中选保护工作簿：
输入密码：
也可以在审阅中点保护工作表和保护工作簿：
EXCEL多重加密保护文档方法演示完成。
李老师简介：创办电脑学校，专职从事电脑教学二十余年。头条号：李老师电脑教学课堂，简单实用，清晰明了，专门系统讲解电脑知识，软件使用技巧，欢迎关注。
如何破解Excel VBAproject工程密码？
VBAproject工程密码
1、将你要的Excel文件关闭，然后新建一个Excel文件
2、打开新建的这个Excel，按下alt+F11，打开vb界面，新建一个模块
3、将代码复制到这个模块中
Private Sub VBAPassword() '你要解保护的Excel文件路径
Filename = Application.GetOpenFilename(Excel文件（*.xls & *.xla & *.xlt）,*.xls;*.xla;*.xlt, , VBA)
If Dir(Filename) = Then
MsgBox 没找到相关文件,请重新设置。
Exit Sub
Else
FileCopy Filename, Filename & .bak '备份文件。
End If
Dim GetData As String * 5
Open Filename For Binary As #1
Dim CMGs As Long
Dim DPBo As Long
For i = 1 To LOF(1)
Get #1, i, GetData
If GetData = CMG= Then CMGs = i
If GetData = [Host Then DPBo = i - 2: Exit For
Next
If CMGs = 0 Then
MsgBox 请先对VBA编码设置一个保护密码..., 32, 提示
Exit Sub
End If
Dim St As String * 2
Dim s20 As String * 1
'取得一个0D0A十六进制字串
Get #1, CMGs - 2, St
'取得一个20十六制字串
Get #1, DPBo + 16, s20
'替换加密部分机码
For i = CMGs To DPBo Step 2
Put #1, i, St
Next
'加入不配对符号
If (DPBo - CMGs) Mod 2 0 Then
Put #1, DPBo + 1, s20
End If
MsgBox 文件解密成功......, 32, 提示
Close #1
End Sub
4、然后点击运行按钮，如图所示，绿色的小三角就是
5、你会看到，打开了一个文件夹，找到我们要的这个文件，然后点击打开
6、这里我们会看到成功的提示了
7、再次打开的这个文件，可以查看代码了