以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何在窗口表中的单元格进行查找引用数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189310)
--  作者：hrw68529
--  发布时间：2023/11/23 17:10:00
--  [求助]如何在窗口表中的单元格进行查找引用数据
有一窗口表Tables("党组议题_汇报")，还有一个数据表“信息引用索引”表，在窗口表中，“牵头领导”列引用数据表“信息引用索引”列中的“领导分工”集合，当“牵头领导”列选择一个领导姓名后，在窗口表中的“责任单位”列，只显示该领导分工负责的单位供选择，不显示其他单位。如何写代码。请指导。谢谢

（1）窗口表“牵头领导”列的代码：Tables("党组议题_汇报").Cols("牵头领导").ComboList = DataTables("信息引用索引").GetComboListString("领导分工","","序号")
（2）窗口表“责任单位”列的代码： 。。。。。
（3）数据表“信息引用索引”中领导分工及所负责的单位

领导分工 责任单位
朱*红 局办公室
朱*红 人事科
朱*红 规划财务科
朱*红 机关党委
李*清 一科
周*杰 二科
周*杰 三科
吴*成 四科
李*清 五科
李*清 服务中心
鲁*洁 六科
朱*红 管理处
李*清 专班
吴*成 管理服务中心
朱*红 督导推进专班
吴*成 秘书科
周*杰 供应站
朱*红 创建办
朱*红 局工会



[此贴子已经被作者于2023/11/23 17:16:58编辑过]
--  作者：有点蓝
--  发布时间：2023/11/23 17:28:00
--  
参考：http://www.foxtable.com/webhelp/topics/1457.htm

窗口表事件PrepareEdit中。

例如：

If e.IsFocusCell Then \'如果是焦点所在单元格
    If e.Col.Name = "责任单位" Then \'如果正在编辑的是县市列
        \'从行政区域表提取该省市的县市作为列表项目
        e.Col.Combolist = DataTables("信息引用索引").GetComboListString("责任单位", "[领导分工] = \'" & e.Row("牵头领导") & "\'","序号")

    End If
End If
--  作者：hrw68529
--  发布时间：2023/11/23 17:34:00
--  
有点蓝老师：窗口表事件   没有  PrepareEdit
--  作者：有点蓝
--  发布时间：2023/11/23 17:40:00
--  
到窗口表绑定的主表事件写代码即可
--  作者：hrw68529
--  发布时间：2023/11/23 17:42:00
--  
好的，谢谢