首页officeexcel正文

使用Protect方法和Unprotect方法如何实现Excel工作簿的保护

强国说学习2023-04-2082保护工作所示方法Excel2003教程

  Excel工作簿的保护是指不允许对Excel工作簿进行增删改操作,比如不能在工作簿中新增工作表,或者是不能在工作簿中删除工作表,更改工作表的名称等操作。以下是小编为您带来的关于使用Protect方法和Unprotect方法实现Excel工作簿的保护,希望对您有所帮助。

  使用Protect方法和Unprotect方法实现Excel工作簿的保护

  1、启动Excel并打开Visual Basic编辑器,在工程资源管理器中插入一个模块,在该模块的“代码”窗口中输入VBA代码,如图1所示。该程序代码用于为工作簿添加保护,具体代码如下所示:

文章内容来源于网络,由WPS之家(wps.qiangguoshuo.com)收集,希望能为您提供帮助。

  Sub ProtectWorkbook()

  ActiveWorkbook.Protect Password:="123",Structure:=True '添加保护

  End Sub

  图1 在“代码”窗口中添加程序代码

  提示

  Protect方法保护3个参数,它们分别是Password、Structure和Windows。其中,Password参数用于指定保护密码;Structure参数设置为True时,将保护工作簿结构,此时无法对工作簿中的工作表进行插入、删除和复制等操作;Windows参数设置为True时,将保护工作簿窗口,此时无法对窗口进行最小化、最大化和关闭操作。

  2、如果需要解除对工作簿添加的密码保护,可以在“代码”窗口中添加代码,如图2所示。具体程序代码如下所示:

  Sub UnprotectWorkbook()

  ActiveWorkbook.Unprotect"123" '取消密码保护

  End Sub

  图2 添加用于解除工作簿保护的程序代码

  3、运行ProtectWorkbook过程,将无法对工作簿中的工作表进行增删等操作,同时工作簿窗口左上角的最大化、最小化等按钮消失,该工作簿无法关闭,如图3所示。运行UnprotectWorkbook过程可取消对工作簿的保护,工作簿能正常操作。

  图3 工作簿被保护

如想转载该文章请注明出处:强国说学习-qiangguoshuo.com
强国说学习

转载声明:本站发布文章及版权归原作者所有,转载本站文章请注明文章来源!

本文链接:https://www.qiangguoshuo.com/excel/64738.html