有一个excel文件,包括有N个工作表 我们可以给这些工作表各自添加不同的密码,只有输入正确密码才可以查看。 动画演示:(注意E列输入密码后下面工作表标签的变化) 是不是很高级、有用的样子!其实设置方法很简单,跟兰色一起做吧。 操作步骤: 1、添加一个叫“主界面”的工作表,在E和F列从第4行起设置一个访问权限界面。E列是你的excel文件中要设置访问密码的工作表的名称,F列用来输入和验证密码。删除密码或密码输入错误,表格就会隐藏起来。 2、添加一个叫“设置”的工作表,表格样式和“主界面”完全一样,只是E列输入每个工作表的访问密码。 3、在工作表标签上右键-查看代码-打开一个叫visiblebasic...的窗口,在窗口左上角单击“主界面”工作表名称,然后把下面的代码复制到右侧的空白处。 VBA代码: PrivateSubWorksheet_Change(ByValTargetAsRange) OnErrorResumeNext IfTarget.Column=5AndTarget.Row4Then IfSheets(设置).Range(Target.Address)=Target.ValueThen Sheets(Cells(Target.Row,4).Value).Visible=-1 Else Sheets(Cells(Target.Row,4).Value).Visible=2 EndIf EndIf EndSub 4、文件-另存为-保存类型选择为“Excel启用宏的工作簿(excel版跳过此步) 设置完成! 注意:在关闭表格时,要把密码一个个的删除,以隐藏工作表,这样其他人打开表格只能通过输入密码来查看了。 赞赏 长按白蚀丸价格大概是多少乌鲁木齐治疗白癜风医院
|