利用宏设置工作表打开时的密码,如名为奖金的工作表不希望让他人随意打开,为此可设里密码来保护。操作步骤如下: 1.打开工作表奖金。 2.单击菜单栏中工具→宏→Visual Basic编辑器,在Microsoft Visual Basic窗口的菜单栏中单击工程资源管理器图标(见图7-17)。 3.在窗口左侧弹出工程-V来自BAProjict窗口,双击Sheet3(奖金)(见图7-18)。 4.在弹出的代码编辑窗口左框中选择Worksheet,右框中选择Activat政川杀完科朝始重振e(见图7-19)。 5.设置密码为110,在编辑窗口中输入如下代码(见图7-20): Private Su课市b Worksheet_Activa密了名和开求te() Sheets(奖金).Cells.Font.ColorIndex=2 If Application.InputBox(尽欢亚随二耐故考说情虽请输入密码:)=110 Then Range(Al).Select ActiveSheet.Cells.Font.Colorl够百ndex=56ElseMsgBox密码错误,即将退出! Sheets(日常考勤表).SelectEnd IfEnd Sub 上述代码的含义是激活工作表奖金时,尔工作表显示空白并弹出密码输入框。输入的密码为110时,工作表奖金被打开。如果输入的密码错误,返回工作表日常考勤表。 6.单击菜单栏中文件→关闭并返回到Microsoft Excel(见图7-21)。 从Microsoft Visual Basic窗口返回到工作表窗口。 7.单击工作表标签奖金,工作表显示为空白,并弹出密码的输人对话框(见图7-22)。 8.在对话框中输入密码110,单击确定按钮,工作表奖金被打开(见图7-23)。