在VBA中,如何编写代码为工作表添加密码!

 时间:2024-10-13 10:15:42

1、为工作表【789】加密,打开时无显示内容,并跳出输入密码对话框,正确输入密码后,显示表中内容,若输入密码错误,则不显示里面的内容,也无法进行编辑操作!

在VBA中,如何编写代码为工作表添加密码!

2、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!

在VBA中,如何编写代码为工作表添加密码!

3、会进入VBA编辑界面!双击左侧栏中准备加密的工作表!

在VBA中,如何编写代码为工作表添加密码!

4、会弹出事件程序代码编辑窗口!

在VBA中,如何编写代码为工作表添加密码!

5、在事件程序界面里的左下拉菜单中选择【worksheet】,右下拉菜单中选择【activate】。

在VBA中,如何编写代码为工作表添加密码!在VBA中,如何编写代码为工作表添加密码!

6、在事件程序窗口,输入以下代码:Private Sub Worksheet_Acti箪滹埘麽vate()i = InputBox("请输入密码媪青怍牙")If i = 123 Then Cells.Font.Color = RGB(0, 0, 0)Else Sheet11.ActivateEnd IfApplication.EnableEvents = flaseEnd Sub

在VBA中,如何编写代码为工作表添加密码!

7、双击左侧栏中的“thisworkbook”工作薄!右下拉菜单中选择【open】,输入以下代艨位雅剖码。Pri即枢潋雳vate Sub Workbook_Open()Application.EnableEvents = TrueSheet8.Cells.Font.Color = RGB(255, 255, 255)Sheet11.SelectEnd Sub

在VBA中,如何编写代码为工作表添加密码!

8、点击保存关闭工作表,我们再次打开工作簿时,点击工作表【789】,需要正确输入密码后,才能显示内容和进行编辑操作!

在VBA中,如何编写代码为工作表添加密码!
  • excel的vba怎么填充序列号?
  • 怎么给VBA代码设置密码
  • Excel中如何利用VBA查找工作表
  • excel vba行列选择
  • 怎样使用VBA将选区公式转换成数值?
  • 热门搜索
    溱潼古镇旅游攻略 中国旅游的好地方 哈尔滨旅游景区 止锚湾旅游攻略 上海金山旅游 趣途旅游网 我要旅游网 汤加旅游 庐山旅游网 深圳到日本旅游