返回首页
当前位置: 主页 > Excel教程 > Excel VBA教程 >

Excel保护部分单元格的方法

时间:2013-10-29 23:31来源:Office教程学习网 www.office68.com编辑:麦田守望者

文章介绍使用VBA来实现excel保护部分单元格,并给出基础操作保护部分单元格的链接。

  本文介绍使用VBA代码来进行excel保护部分单元格的方法。

  我们在需要进行excel保护部分单元格的工作表标签中,单击右键,选择“查看代码”,打开VBE编辑器,在编辑框输入下面的代码:

excel保护部分单元格

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim b As Boolean
For Each c In Target '循环选定单元格
If c <> "" Then '如果单元格非空
b = True
Exit For '退出循环
End If
Next
ActiveSheet.Unprotect Password:="123" '撤消保护
If b = True Then
Target.Locked = True '锁定单元格
ActiveSheet.Protect Password:="123" '保护工作表,密码123
End If
End Sub

excel保护部分单元格


  然后返回工作表中,当我们在单元格输入数据,马上就会对有数据内容的单元格进行保护,当我们试图要修改编辑时,只有通过撤销保护才能修改。

 

  通过上面代码实现的excel保护部分单元格,就只对有数据内容的单元格进行保护,而空单元格是不受任何保护的,也就是可以正常随意的输入内容。

------分隔线----------------------------
标签(Tag):excel excel2007 excel2010 excel2013 excel2003 excel技巧 excel教程 excel实例教程
------分隔线----------------------------
推荐内容
猜你感兴趣