主题：锁定列

 那就遍历呗。

 for each c as col in tables("xxx").cols
    c.AllowEdit = false
 next

 楼上的也是一个方法，不过这样的话，每次都需要去查找一下是否满足编辑条件，不太划算。