以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]判断鼠标单元格是否在某列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99142)
--  作者：haotinghua
--  发布时间：2017/4/13 12:29:00
--  [求助]判断鼠标单元格是否在某列
有一个窗口中的Table,在keydown部分输入代码，希望鼠标单击或鼠标在“项目"列中时按下空格键当前单元格为空格，
现在的代码是在同一行的其它单元格选中后按空格键，”项目“列的同行单元格都会变为空格，于是加一个判断，只对指定的列有效，
If e.Table.Current("项目").Select Then \'这行不对，请求协助
    If e.keyCode = Keys.space Then
        Tables("报价单_Table1").Current("项目") = Nothing
    End If
End If


另外，同时想在这个窗口的Table中实现鼠标滚动，表格跟着上下滚动是否可以实现？
--  作者：有点蓝
--  发布时间：2017/4/13 14:29:00
--  
If e.Table.Current IsNot Nothing Then \'这行不对,请求协助
    If e.Table.ColSel = e.Table.Cols("项目").Index
        If e.keyCode = Keys.space Then
            Tables("报价单_Table1").Current("项目") = Nothing
        End If
    End If
End If

表格跟着上下滚默认就是可以的
--  作者：haotinghua
--  发布时间：2017/4/13 14:51:00
--  
谢谢＠有点蓝，按你的方式问题解决了．
鼠标滚动我测试了，要点一下表后就可以