首先我们按住“ALL+F11”，这个时候会启动VBA编辑器。右键点击插入-用户窗口。

将控件中的按钮，和文本框画在“uaerform1”中即可。

这个时候点击登录，然后输入一下命令：

IfTextBox1.Value=\"管理员\"AndTextBox2.Value=\"123\"ThenMe.HideSheets(\"sheet1\").SelectElse

ThisWorkbook.Application.QuitE

Endif

然后点击“ThisWorkbook”，之后输入代码：

PrivateSubWorkbook_Open()

UserForm1.Show

0EndSub启动如果是2007版本以后，界面如下：（备注：需将文件另存为xlxm文件格式）保存的时候，选择“工具”→“常规工具”，在录入密码即可。