Foxtable(狐表)用户栏目专家坐堂 → 数据比对


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

主题:数据比对

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


加好友 发短信
等级:小狐 帖子:388 积分:3212 威望:0 精华:0 注册:2017/4/2 19:33:00
数据比对  发帖心情 Post By:2020/12/17 12:35:00 [只看该作者]

老师您好!
经常在工作中遇到EXCEL数据中两个文档数据需要比对的地方,当然用EXCEL函数也能够实现,我在设想通过Foxtable也能设计一个能用的数据比对程序:如导入两个不同电子表格,两个文档中有相同的参数用于比对。请老师给个设计思路,能不能够实现这个功能?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110749 积分:563671 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/17 13:38:00 [只看该作者]

方法1、关联筛选:http://www.foxtable.com/webhelp/topics/1479.htm
2、把2个表数据合并为查询表对比:http://www.foxtable.com/webhelp/topics/2322.htm
3、写代码遍历2个表的行逐一比较
For Each dr1 As DataRow In DataTables("表A").datarows
   dim dr as datarow = 
DataTables("表B").Find("第一列='" & dr1("第一列") & "'")
       if dr is nothing then
msgbox("没有数据")
end if
    
Next
Next

 回到顶部