密码保护Excel宏
就像你可以使用密码保护工作簿和工作表，您可以使用密码保护的宏在Excel中被看到（和执行）。
将工作表上的一个命令按钮并添加以下代码行：
1.首先，创建一个简单的宏，要保护。
Range("A1").Value = "This is secret code"
2.接下来，单击工具，VBAProject属性。
3.在保护选项卡，勾选“查看时锁定工程”，并输入密码两次。
4.单击确定。
5.保存，关闭并重新打开Excel文件。尝试查看代码。
下面的对话框将出现：
您仍然可以通过单击命令按钮执行的代码，但你不能再查看或编辑的代码（除非你知道密码）。可下载的Excel文件的密码是“容易”。
6.如果您想用密码保护的宏被执行，添加以下代码行：
Dim password As Variant
password = Application.InputBox("Enter Password", "Password Protected")
Select Case password
Case Is = False
'do nothing
Case Is = "easy"
Range("A1").Value = "This is secret code"
Case Else
MsgBox "Incorrect Password"
End Select
结果当您单击工作表上的命令按钮：
说明：宏使用应用程序对象的InputBox方法。如果用户点击取消，该方法返回False，并没有任何反应（的InputBox消失）。只有当用户知道密码（“易”了），秘密代码就会被执行。如果输入的密码不正确，会显示一个MsgBox。请注意，由于该项目被视为保护用户不能看看在Visual Basic编辑器的密码。