EXCEL如何编辑登录窗口？

首先建立一个用户窗体UserForm1做为登录窗，设置两个文本正伏框TextBox1和TextBox2，一个确定按钮，CommandButton1。代码如下\x0d\x0aPrivate Sub CommandButton1_Click()\x0d\x0aIf TextBox1.Value = "管理员" And TextBox2.Value = "123" Then\x0d\x0aMe.Hide\x0d\x0aSheets("sheet1").Select\x0d\x0aElse\x0d\x0aThisWorkbook.Application.Quit\x0d\x0aEnd If\x0d\x0aEnd Sub\x0d\x0a在thisworkbook项输入如明清弊下代码，就在打激族开文档时d出登录窗。\x0d\x0aPrivate Sub Workbook_Open()\x0d\x0aUserForm1.Show 0\x0d\x0aEnd Sub

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

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

双击“登录”按钮，并输入：

If TextBox1.Value = "管理员" And TextBox2.Value = "123" ThenMe.HideSheets("sheet1").SelectElseThisWorkbook.Application.QuitE

End if

双击“ThisWorkbook”并输入代码：

Private Sub Workbook_Open()UserForm1.Show 0End Sub

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

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

---