分类分类
关注+2004-10-15作者:蓝点
二、我们也可以通过简单的VBA编制宏对工作表的Visible属性来设置隐藏工作表,下面的代码是名为“Hidesh”和“Showsh”的两个宏,前者将工作表的Visible的属性设置为False,当运行该宏之后,工作表Sheet1将变为隐藏工作表,此时工作表不能被直接访问,从而起到保护作用。后者是用来取消工作表的隐藏属性。
Sub Hidesh()
Worksheets("sheet1").Visible=False
End Sub
Sub Showsh()
Worksheets("sheet1").Visible=True
End Sub
添加宏的的操作步骤如下:首先,选择“工具”菜单下“宏”,然后选择“Visual Basic编辑器”命令,在“Visual Basic编辑器”中选择“插入”菜单下的“模块”命令,然后在模块的代码编辑器中输入上述代码,单击“保存”按钮。
要执行宏命令,选择“工具”菜单下的“宏”命令,打开“宏”对话框,在对话框中可以看到已经添加的宏,选择要执行的宏,然后单击“执行”按钮,即可对工作表进行隐藏或者显示。
三、其实我们还可以通过修改Excel工作薄的后缀名来对文件实现保护,方法是:在Excel工作薄文件上点击鼠标右键,在弹出的快捷菜单中选择“重命名”,比如把Excel文件的后缀名由“.xls”改为“.sys”,按回车键确认,会弹出一个警告对话框,点击“是”按钮,此时文件类型已经被伪装成了sys类型的系统文件,这样那些想偷窥此文件的人就不敢轻举妄动了
相关文章
更多+相同厂商
热门推荐
点击查看更多
点击查看更多
点击查看更多
说两句网友评论