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

 时间:2024-10-11 20:43:17

1、步骤一:启动Excel并打开Visual Basic编辑器,在工程资源管理器中插入一个模块,在该模块的“代码”窗口中输入VBA代码,如图1所示。该程序代码用于为工作簿添加保护,具体代码如下所示:Sub ProtectWorkbook()ActiveWorkbook.Protect Password:="123",Structure:=True '添加保护End Sub提示:Protect方法保护3个参数,它们分别是Password、Structure和Windows。其中,Password参数用于指定保护密码;Structure参数设置为True时,将保护工作簿结构,此时无法对工作簿中的工作表进行插入、删除和复制等操作;Windows参数设置为True时,将保护工作簿窗口,此时无法对窗口进行最小化、最大化和关闭操作。

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

2、步骤二:如果需要解除对工作簿添加的密码保护,可以在“代码”窗口中添加代码,如图2所示。具体程序代码如下所示:Sub UnprotectWorkbook()ActiveWorkbook.Unprotect"123" '取消密码保护End Sub

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

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

使用Protect和Unprotect方法保护Excel工作簿
  • Excel VBA取消全部隐藏的工作表?
  • 如何利用Excel中的VBA编程实现进度条加载效果
  • 怎样使用VBA删除工作簿中所有空白工作表?
  • VBA实现根据Excel单元格内容自动插入对应图片
  • 文档部分内容包含文档检查器无法删除的个人信息
  • 热门搜索
    清正廉洁手抄报 清明节手抄报简单漂亮 缅怀先烈手抄报图片 感恩节手抄报内容 科技手抄报资料 古典名著手抄报 迎中秋庆国庆手抄报 戏曲大舞台手抄报 关于诗的手抄报 关于新型冠状病毒的手抄报