求各位大佬支招！

用心修炼

附件是我自己写的一个简易进销存，我想实现一个功能，就是打开工作薄之后，在窗体界面输入用户名和密码！只有输入用户名：张三，密码：123456时，所有表都可以编辑，就是能正常使用；只要用户名不是张三，那么只有“库存表”和“查询表”显示，其余表深度隐藏！并且“库存表”当中的数据，不能被编辑和修改。之前实现了前面的功能，但是输入不是张三的用户名时，却达不到想要的效果，由于各表用了失去“焦点事件”，当输入用户名不是张三的时候，虽然只有2张表显示出来，但是离开任一一个表时，就又隐藏了。，求各位大神指点，如何写！模块代码密码：000000

活在理想的世界

111111111111111111111111111111111111111111111

用心修炼

活在理想的世界 发表于 2018-7-14 13:47
111111111111111111111111111111111111111111111

大佬，感谢你帮忙，你测试过没有啊！我输入张三，密码123456，登陆进去没有反应了，我单击主页上的几个单元格，跳转不到对应的表，求帮助！

用心修炼

用心修炼 发表于 2018-7-14 14:17
大佬，感谢你帮忙，你测试过没有啊！我输入张三，密码123456，登陆进去没有反应了，我单击主页上的几个单 ...

大佬，可能我没有表达清楚！之前每个sheet都设置了：工作表失去焦点事件！刚才看了帮我修改的代码，把这些都删除了。可不可以就是说，这些工作当中的“失去焦点事件”的代码不要删除，只要用户名不是张三，所有表取消保护，可以正常编辑；如果不是张三，除了查询表不被保护外，其余所有表都被保护，不能被修改和编辑！

活在理想的世界

用心修炼 发表于 2018-7-14 14:33
大佬，可能我没有表达清楚！之前每个sheet都设置了：工作表失去焦点事件！刚才看了帮我修改的代码，把这 ...

111111111111111111111111111111111111111111111111111

用心修炼

活在理想的世界 发表于 2018-7-14 14:39
111111111111111111111111111111111111111111111111111

大佬，感谢帮忙！还有个问题啊，就是当我输入的用户名，不是张三的时候，就一直提示密码错误，关闭窗口的时候，整个工作簿都关了！可不可以帮我实现以下：1、在窗体上面有个提示：”不是仓库人员，不需要输入密码，只有查询权限！”，这个提示信息！当输入的用户名不是张三的时候，密码可以为空或任意字符串，此时，通过主页还是可以正常切换到其他sheet，除了”查询表”只允许被编辑，其他所有工作表被保护，都不能被编辑和修改！只有输入用户名是张三和密码123456时，所有表自动取消保护，才可以被编辑和修改。我试了用protect方法，好像不行，虽然在视图菜单栏中能看到是被保护状态，但是还是可以被编辑。跪求大神帮我实现！

活在理想的世界

用心修炼 发表于 2018-7-14 15:03
大佬，感谢帮忙！还有个问题啊，就是当我输入的用户名，不是张三的时候，就一直提示密码错误，关闭窗口的 ...

可以实现，但是你不能再找我了。否则我就变成活雷锋了。

用心修炼

活在理想的世界 发表于 2018-7-14 15:09
可以实现，但是你不能再找我了。否则我就变成活雷锋了。

大佬，帮个忙吧！之前是我问题没有描述清楚。跪求帮助

活在理想的世界

用心修炼 发表于 2018-7-14 15:12
大佬，帮个忙吧！之前是我问题没有描述清楚。跪求帮助

再开一贴，就目前系统的情况做简要说明，再让其他人在我代码的基础上帮你加几句。

用心修炼

用心修炼 发表于 2018-7-14 15:12
大佬，帮个忙吧！之前是我问题没有描述清楚。跪求帮助

大佬，您好人就做到底吧，我也就一个小白吧，刚入门VBA不久！我知道这个对你来说很容易。