用户权限管理系统

Click to edit Master title style,Click to edit Master text styles,Second level,Third level,Fourth level,Fifth level,Click to edit Master title style,Click to edit Master text styles,Second level,Third level,Fourth level,Fifth level,Click to edit Master title style,Click to edit Master text styles,Second level,Third level,Fourth level,Fifth level,Office,职场应用书库,Excel 2010,人力资源管理入门与实战体验,用户权限管理系统,创建管理用户权限的窗体,保护设计完成的用户权限管理系统,应用用户权限管理系统,设计思路,使用,VBA,建立用户权限管理系统的具体设计思路如下：,从中不难看出用户权限管理系统包括创建用户权限管理窗体、保护用户权限管理系统、应用用户权限管理系统三个部分，且每部分右侧列举与之对应的设计内容。本章创建的用户权限管理系统知识简单将用户分为“一般用户”、“高级用户”、“管理员”三个用户级别，并且该系统由,2,个数据表、,3,个窗体和,3,个权限三部分组成。,创建管理用户权限的窗体,创建“用户权限管理系统说明”和“用户权限”工作表,创建【登录】窗体,创建【注册】窗体,创建【更改用户权限】窗体,创建“用户权限管理”和“用户权限”工作表,具体操作步骤如下：,步骤,1,：新建一个工作薄并将其保存为“用户权限管理系统”；将“,Sheet1,”工作表的名称设置为“用户权限管理系统说明”；最后合并,A1,：,I1,之间的单元格，在其中输入文本“用户权限管理系统”，如图,11-2,所示。,步骤,2,：选中,A1,单元格并右击，在弹出菜单中选择“设置单元格格式”选项，即可打开【设置单元格格式】对话框，选择“字体”选项卡，在“字体”下拉列表中选择“黑体”选项；在“字形”下拉列表中选择“加粗”选项；在“字号”下拉列表中选择“,16,”选项，在“颜色”下拉列表中选择相应颜色，如图,11-3,所示。,创建“用户权限管理”和“用户权限”工作表,具体操作步骤如下：,步骤,3,：选择“填充”选项卡，在“背景色”栏目中选择需要填充的颜色，如图,11-4,所示。单击【确定】按钮，即可看到设置后的单元格字体和填充效果，如图,11-5,所示。分别合并,A2,：,A6,、,A7,：,A11,、,B2,：,I6,以及,B7,：,I11,之间的单元格，如图,11-6,所示。,创建“用户权限管理”和“用户权限”工作表,具体操作步骤如下：,步骤,5,：为了表格美观，需要使用自动换行功能。选中,A2,：,B7,之间单元格，在右击菜单中选择“设置单元格格式”选项，即可打开【设置单元格格式】对话框，如图,11-7,所示。,步骤,6,：选择“对齐”选项卡，在“水平对齐”下拉列表中选择“靠左”选项；在“文本控制”区域中勾选“自动换行”复选框，单击【确定】按钮，即可启动“自动换行”功能。分别在,A2,：,B6,之间的单元格输入有关“用户权限管理系统”的说明，如图,11-8,所示。,创建“用户权限管理”和“用户权限”工作表,具体操作步骤如下：,步骤,7,：设置,A2,：,B6,之间单元格的边框和填充属性，如图,11-9,所示。用户在实际应用中可以考虑添加一些图片和动画等内容。,步骤,8,：创建“用户权限”工作表，在“用户权限管理系统”工作薄中将“,Sheet2,”工作表重命名为“用户权限”；合并,A1,：,E1,之间的单元格，在其中输入文本“用户权限管理”，如图,11-10,所示。,创建“用户权限管理”和“用户权限”工作表,具体操作步骤如下：,步骤,9,：选中合并后的,A1,单元格，设置该元格的字体和填充属性，如图,11-11,所示。在,A3,：,C10,之间单元格中分别输入已经注册用户的编号、级别、密码等信息，如图,11-12,所示。拖动鼠标选中,A3,：,C30,之间单元格，再给这些单元格设置边框，如图,11-13,所示。,保护设计完成的用户权限管理系统,隐藏工程代码,锁定工程,锁定工程,锁定工程的具体操作步骤如下：,步骤,1,：在【,Microsoft Visual Basic for Application,】主窗口可对工程进行保护，在【,Microsoft Visual Basic for Application,】主窗口中选择“,VBAProject,（用户权限管理系统）”工程，如图,11-85,所示。,步骤,2,：在右击弹出菜单中选择“,VBAProject,属性”选项，即可打开【,VBAProject-,工程属性】对话框，选择“保护”选项卡，在“锁定工程”组合框勾选“查看时锁定工程”复选框；在“查看工程属性的密码”组合框中的“密码”和“确认密码”文本框输入相同的密码，如,123,，如图,11-86,所示。,锁定工程,锁定工程的具体操作步骤如下：,步骤,3,：单击【确定】按钮，即可对该工程进行保护。再次打开“用户权限管理系统”工作薄，再打开【,Microsoft Visual Basic for Application,】主窗口，即可看到“用户权限管理系统”工程已经被锁定，如图,11-87,所示。,步骤,4,：双击“,VBAProject,（用户权限管理系统）”工程，即可打开【,VBAProject,密码】对话框，如图,11-88,所示。,锁定工程,锁定工程的具体操作步骤如下：,步骤,5,：在“密码”文本框中输入一个错误密码，单击【确定】按钮，即可打开【无效的密码】提示框，在“密码”文本框中输入正确密码（,123,），如图,11-89,所示。,步骤,6,：单击【确定】按钮，即可打开【,Microsoft Visual Basic for Application,】窗口，在其中看到“用户权限管理系统”工程已成可用状态，如图,11-90,所示,。,如果想取消锁定工程，则在【,VBAProject-,工程属性】对话框取消勾选“查看时锁定工程”复选框，单击【确定】按钮，即可成功取消锁定工程。,应用用户权限管理系统,验证用户权限管理系统,1,未注册用户,2,一般用户,3.,高级用户,4.,管理员,将用户权限管理系统保存为模板,验证用户权限管理系统,未注册用户,对于尚未注册的用户实现注册功能的具体操作步骤如下：,步骤,1,：重新打开创建的“用户权限管理系统”工作薄，即可打开【登录窗口】对话框，如图,11-91,所示。,步骤,2,：单击【注册】按钮，即可打开【注册】对话框，在“注册用户名”文本框中输入未注册用户名，例如,UD1034,；在“注册密码”文本框中输入“,123,”，如图,11-92,所示。,步骤,3,：单击【注册】按钮，即可打开【注册成功】对话框，如图,11-93,所示。,验证用户权限管理系统,未注册用户,对于尚未注册的用户实现注册功能的具体操作步骤如下：,步骤,4,：如果在【注册】对话框中的“注册用户名”文本框中输入“员工资料表”中不存在的员工编号，如,UD1055,；在“注册密码”文本框中输入“,123,”，如图,11-94,所示。单击【注册】按钮，即可打开【没有这个员工，用户名输入有误】提示框，如图,11-95,所示。,验证用户权限管理系统,未注册用户,对于尚未注册的用户实现注册功能的具体操作步骤如下：,步骤,5,：如果在【注册】对话框中的“注册用户名”文本框中输入已经注册过的员工编号，例如,UD1001,；在“注册密码”文本框中输入“,123,”，如图,11-96,所示。单击【注册】按钮，即可打开【该用户名已经注册，不能重复注册】提示框，如图,11-97,所示。,专家课堂（常见问题与解答）,点拨,1,：,在用户权限管理系统设计完成后，为什么还要隐藏工程代码和锁定工程？,解答：,之所以要进行隐藏工程代码和锁定工程操作，是为了避免用户通过【登录窗口】进入工作薄，单击“代码”组中的【,Visual Basic,】按钮，在打开的窗口中对创建的用户权限管理系统进行修改。,点拨,2,：,在创建【注册】窗体的最后，为什么要在“模块,1,”代码编辑窗口中设置“,change,”函数？,解答：,在“模块,1,”代码编辑窗口中设置“,change,”函数的原因在于：只有通过单击【更改用户权限】按钮，才可以打开【更改用户权限】窗体，而【更改用户权限】按钮对应的“宏名”为“,change,”。所以“,change,”函数就是【更改用户权限】按钮指定宏的内容。,谢谢欣赏！,