| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 跨表取数 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=172479) |
| -- 作者：nbsugu_z -- 发布时间：2021/10/14 15:36:00 -- 跨表取数 A表只有一行，列名：工程量 B表多行 有：编号列 和 工程量进度列 现在要求A表的工程量单元格从 B表以编号为条件 取 工程量进度 的数据到A表。但是A表没编号列的。要如何写代码
|
| -- 作者：有点蓝 -- 发布时间：2021/10/14 15:50:00 -- 以编号为条件 -- 什么用的条件？ A表永远只有一行？
|
| -- 作者：nbsugu_z -- 发布时间：2021/10/14 18:44:00 -- 是的，A表永远是一行，我是作为动态更新的。比如查找到B表中某行编号为1234的这行，然后将工程进度量列的数据填充到A表工程量单元格。注意，B表编号肯定有的，且固定的字符 |
| -- 作者：有点蓝 -- 发布时间：2021/10/14 20:42:00 -- 查询数据参考：http://www.foxtable.com/webhelp/topics/0396.htm Dim dr As DataRow dr = DataTables("B表").Find("编号=\'1234\'") If dr IsNot Nothing Then \'如果找到的话 Tables("B表").rows(0)("工程量") = dr("工程进度量") End If
|
| -- 作者：nbsugu_z -- 发布时间：2021/10/14 22:06:00 -- 我真笨，写成e.datarow(“工程量”）=…….了，谢老师 |