非高手免进!!EXCEL中,如何设置一旦在单元格内输入新数据后就自动受密码保护不能作修改

[复制链接]
查看11 | 回复5 | 2010-9-21 08:16:12 | 显示全部楼层 |阅读模式
因工作需要,为防止他人修改,我需要在EXCEL表格中一旦录入新的数据后,该数据就受密码保护不能作修改,原来设置的:工具/单元格/保护/取消锁定,然后再在工具保护工作表,这种方法只能保护原来的数据,输入的新数据如果不重新设置仍然不能自动受密码保护,现在要求:一旦在单元格中录入新数据不需再作设置能马上自动受密码保护,请高手帮忙解答该问题!如能成功解答该问题者可得悬赏分20分。谢谢!!
有些人的回答等于没回答,有些回答又太复杂了,没想到,这个问题居然没有个简单有效的解决办法

回复

使用道具 举报

千问 | 2010-9-21 08:16:12 | 显示全部楼层
方法是有的。用VBA解决。工作表保护密码:123 你可以在代码中自己更改工作表中只要单元格不为空程序就会锁定保护单元格右键单击工作表标签,在右键菜单中选择“查看代码”,然后在出现的工作表代码编辑窗口复制粘贴以下代码:Private Sub Worksheet_Change(ByVal Target As Range)Dim rng As Range If Target.Count = 1 Then
Unprotect Password:=123
Cells.Locked = False
Set rng = UsedRange
For i = 1 To rng.Cel
回复

使用道具 举报

千问 | 2010-9-21 08:16:12 | 显示全部楼层
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Count > 1 Then Exit Sub ActiveSheet.Unprotect password:="yzv"If Target.Value"" Then Target.Locked = True:
回复

使用道具 举报

千问 | 2010-9-21 08:16:12 | 显示全部楼层
同意二楼的看法,你所需要的无非是先取消保护,待录入后再设置保护即可。只需2步
回复

使用道具 举报

千问 | 2010-9-21 08:16:12 | 显示全部楼层
你需要的专业的版本控制软件来实现这个功能。VSS或者subversion 都可以。
回复

使用道具 举报

千问 | 2010-9-21 08:16:12 | 显示全部楼层
估计比较困难,因为电脑并不能判断你就是主人,要么整体保护,要么整体取消保护,不可能随时保护。这在逻辑上都是矛盾的。如果你能输入,那电脑就必须同意别人可以输入,电脑确认你身份的唯一途径就是密码,你想不输入密码解锁又要输入那是不可能的。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行