[求助]某些列输入第一次数据后就锁定

yimugangxian · 发表于 2007-6-8 14:52

VBA问题请教大侠们，EXCEL表格中，1-400行必须始终锁定和隐藏，从401行开始的M列和N列的单元格输入第一次数据后即锁定，如何实现？我是外行，还请讲具体的，谢谢

yuanzhuping · 发表于 2007-6-8 17:49

先把工作表的M和N列400行以下取消单元格锁定，然后保护工作表，本示例中密码为空。

Private Sub Worksheet_Change(ByVal T As Range)
    If T.Column = 13 Or T.Column = 14 And T.Row > 400 Then
        If T.Count = 1 Then
            ActiveSheet.Unprotect Password:=""
                T.Locked = True
            ActiveSheet.Protect Password:=""
        End If
    End If
End Sub

ffdnWs6p.rar (10.4 KB, 下载次数: 345)

yimugangxian · 发表于 2007-6-12 14:21

非常感谢，我希望只要M是列和N列的输入过一次数据的单元格锁定（前400行除外，始终全部锁定），能实现吗？

[此贴子已经被作者于2007-6-12 14:23:24编辑过]

lonan2979 · 发表于 2007-6-15 10:47

2楼已经实现了

yuanzhuping · 发表于 2007-6-15 10:54

QUOTE:

以下是引用yimugangxian在2007-6-12 14:21:13的发言：

非常感谢，我希望只要M是列和N列的输入过一次数据的单元格锁定（前400行除外，始终全部锁定），能实现吗？

楼主要的是其他列不锁定？

选择全表，取消锁定再保护工作表。

kokkokkokkok · 发表于 2010-1-13 09:41

當每列第一個儲存格輸入文字後，則整列自動保護．有什麼方法可行！

nbqmdzlcdint · 发表于 2010-10-25 00:56

好像还是有错误哦
能不能帮小弟解释一下啊
谢谢啦

zhengrui-csb · 发表于 2010-10-25 12:56

关注一下期待高手答案

nbqmdzlcdint · 发表于 2010-10-26 09:36

帮忙看看，谢谢

sam.tan · 发表于 2012-2-22 17:55

很好的保护,谢谢了。

用户名		自动登录	找回密码
密码			免费注册

[求助]某些列输入第一次数据后就锁定

只要M是列和N列的单元格锁定

當每列第一個儲存格輸入文字後，則整列自動保護．有什麼方法可行！

请叫一下2楼

再大侠们再看看呢？