[求助]判断鼠标单元格是否在某列 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]判断鼠标单元格是否在某列

共有1780人关注过本帖树形打印复制链接主题：[求助]判断鼠标单元格是否在某列

haotinghua

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：459 积分：3842 威望：0 精华：0 注册：2016/8/21 3:43:00

[求助]判断鼠标单元格是否在某列 发帖心情

Post By：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

另外，同时想在这个窗口的Table中实现鼠标滚动，表格跟着上下滚动是否可以实现？

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110592 积分：562856 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：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

表格跟着上下滚默认就是可以的

haotinghua

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：一尾狐帖子：459 积分：3842 威望：0 精华：0 注册：2016/8/21 3:43:00

Post By：2017/4/13 14:51:00 [只看该作者]

谢谢＠有点蓝，按你的方式问题解决了．

鼠标滚动我测试了，要点一下表后就可以

主题：[求助]判断鼠标单元格是否在某列