- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]数据双向引用 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=63592)
-- 发布时间：2015/1/24 11:58:00
-- [求助]数据双向引用
请老师帮忙，详细的帮助说明在上传文件中，多谢了！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:表间数据双向引用.rar |
-- 发布时间：2015/1/24 14:04:00
--
http://www.foxtable.com/help/topics/1453.htm
-- 发布时间：2015/1/24 14:07:00
--
看了两天了，还是搞不定啊。
-- 发布时间：2015/1/24 14:29:00
--
帮助的代码,直接复制更改列名就可以用,你都没有看.
给你写了.自己参考着做
我建议你先按部就班看一下帮助
-- 发布时间：2015/1/24 14:46:00
--
菜鸟入门，请多见谅，还是不行，无法实现既引用总表数据，又往进去写数据。多谢大师了！
-- 发布时间：2015/1/24 14:50:00
--
测试没有问题,正常引用.我只是引用了一列.作为展示, 你要引用所有列自行添加即可
-- 发布时间：2015/1/24 15:01:00
--
还是不行，必须手工触动引用的单元格才可以，不能自动往总表中写入啊，必须去手工改变清洗时间的值才可以的，我弄了两天了，就是不可以自动的。
[此贴子已经被作者于2015-1-24 15:03:27编辑过]
-- 发布时间：2015/1/24 15:06:00
--
你的意思是什么? 就是自动写入的啊. 能否说具体一点你想怎么个自动法.
-- 发布时间：2015/1/24 15:13:00
--
老师请看：
1、文件共有 清洗 和 总表 两个表
2、在 清洗 表中新增行，当 单号 列中输入单号后，如总表中有此单号，就 自动引用 总表 中此单号行中的
“客户名称”，“车辆信息”，“物品种类”，“套数”列的内容。
3、同时也 把 清洗表中该单号行中的 “清洗时间”，“清洗人”，“清洗特说”列的内容写入到总表对应单号的
对应列。
-- 发布时间：2015/1/24 15:20:00
--
If e.DataCol.Name = "单号" AndAlso e.DataRow.IsNull("单号")=False Then
Dim dr As DataRow
dr = DataTables("总表").Find("[单号] = \'" & e.DataRow("单号") & "\'")
If dr IsNot Nothing
e.DataRow("客户名称")=dr("客户名称")
dr("清洗时间")=e.DataRow("清洗时间")
Else
e.DataRow("客户名称")=Nothing
End If
End If