以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何锁定包含“审核”2个字符的所有列  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=30025)
--  作者：yh718
--  发布时间：2013/3/19 12:45:00
--  如何锁定包含“审核”2个字符的所有列
如何锁定包含“审核”2个字符的所有列
--  作者：狐狸爸爸
--  发布时间：2013/3/19 12:49:00
--  

For Each c As col In Tables("表A").Cols
    If c.name Like "*审核*" Then
        c.AllowEdit = False
    End If
Next
--  作者：yh718
--  发布时间：2013/3/19 13:04:00
--  
谢谢， 如果要锁定所有表中已“审核”结尾的所有列呢
--  作者：唐尸三摆手
--  发布时间：2013/3/19 13:58:00
--  

 

\'以审核结尾，去掉后面的*即可

For Each c As col In Tables("表A").Cols
    If c.name Like "*审核" Then
        c.AllowEdit = False
    End If
Next