以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  窗口表选择性编辑  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=88188)

--  作者：yifan3429 --  发布时间：2016/7/28 14:58:00 --  窗口表选择性编辑 窗口内的 Table1  设计了禁止编辑  我想如果是列 数量 可以编辑   如何 编写代码

--  作者：cbt --  发布时间：2016/7/28 15:32:00 --   \'全局表事件 AfterSelChange Dim c As Col  = e.Table.cols(e.NewRange.ColSel) If c.Name = "数量" Then     Tables("窗口1_Table1").AllowEdit= True Else     Tables("窗口1_Table1").AllowEdit=False End If \'命令窗口执行  全局事件生效 DataTables("窗口1_Table1").GlobalHandler.AfterSelChange = true

--  作者：Hyphen --  发布时间：2016/7/28 16:02:00 --   不要设置AllowEdit属性，改为PrepareEdit写代码 If e.Col.Name <> "数量" Then     e.Cancel = True End If