发布网友 发布时间:2022-04-24 17:22
共2个回答
热心网友 时间:2023-10-25 20:11
就在打开文档时弹出登录窗首先建立一个用户窗体UserForm1做为登录窗。代码如下 Private Sub CommandButton1_Click() If TextBox1,设置两个文本框TextBox1和TextBox2;123" And TextBox2; Then Me;sheet1".Application;).Select Else ThisWorkbook.Value = ".Hide Sheets(",一个确定按钮。 Private Sub Workbook_Open() UserForm1.Value = ".Quit End If End Sub 在thisworkbook项输入如下代码,CommandButton1;管理员" 谢谢,这是我要的答案!
热心网友 时间:2023-10-25 20:11
输入数据错误