Foxtable(狐表)用户栏目专家坐堂 → 跨表取数


  共有65人关注过本帖树形打印复制链接

主题:跨表取数

帅哥哟,离线,有人找我吗?
nbsugu_z
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:378 积分:3359 威望:0 精华:0 注册:2017/4/8 8:59:00
跨表取数  发帖心情 Post By:2021/10/14 15:36:00 [只看该作者]

A表只有一行,列名:工程量
B表多行  有:编号列  和  工程量进度列


现在要求A表的工程量单元格从 B表以编号为条件 取 工程量进度 的数据到A表。但是A表没编号列的。要如何写代码

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:76222 积分:386700 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/10/14 15:50:00 [只看该作者]

以编号为条件  -- 什么用的条件?

A表永远只有一行?

 回到顶部
帅哥哟,离线,有人找我吗?
nbsugu_z
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:378 积分:3359 威望:0 精华:0 注册:2017/4/8 8:59:00
  发帖心情 Post By:2021/10/14 18:44:00 [只看该作者]

是的,A表永远是一行,我是作为动态更新的。比如查找到B表中某行编号为1234的这行,然后将工程进度量列的数据填充到A表工程量单元格。注意,B表编号肯定有的,且固定的字符

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:76222 积分:386700 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:378 积分:3359 威望:0 精华:0 注册:2017/4/8 8:59:00
  发帖心情 Post By:2021/10/14 22:06:00 [只看该作者]

我真笨,写成e.datarow(“工程量”)=…….了,谢老师

 回到顶部