Question

Excel做登录界面

跟着网上的教程用Excel做了个登录界面，发现只要按窗体右上角的关闭键同样也能进入，怎样才能做成：点击关闭窗体就退出Excel？

Answer 1

按"Alt+F11"启动VBA编辑器，右键→插入→用户窗口

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

双击“登录”按钮，并输入：
If TextBox1.Value = "管理员" And TextBox2.Value = "123" Then Me.Hide Sheets("sheet1").Select Else ThisWorkbook.Application.QuitE
End if

双击“ThisWorkbook”并输入代码：
Private Sub Workbook_Open() UserForm1.Show 0End Sub

启动如果是2007版本以后，界面如下：（备注：需将文件另存为xlxm文件格式）

VBA也是容易破解的，用excel自带的帐号密码，相对更安全：保存的时候，选择“工具”→“常规工具”，在录入密码即可。

Answer 2

按"Alt+F11"启动VBA编辑器，右键→插入→用户窗口

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

双击“登录”按钮，并输入：
If TextBox1.Value = "管理员" And TextBox2.Value = "123" Then Me.Hide Sheets("sheet1").Select Else ThisWorkbook.Application.QuitE
End if

双击“ThisWorkbook”并输入代码：
Private Sub Workbook_Open() UserForm1.Show 0End Sub

启动如果是2007版本以后，界面如下：（备注：需将文件另存为xlxm文件格式）

VBA也是容易破解的，用excel自带的帐号密码，相对更安全：保存的时候，选择“工具”→“常规工具”，在录入密码即可。