以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=43758)
--  作者：jieming
--  发布时间：2013/12/14 12:59:00
--  [求助]
在两列姓名中把不同的找出来
--  作者：baicaocao
--  发布时间：2013/12/14 13:34:00
--  

用for each 循环

A列，B列

dim dr as datarow

dim dp as datarow

dim fl as string

for each dr as datarow in datatables("A表").datarows

     dp = datatables("B表").find("B=\'" & dr("A") & "\'")

     if dp isnot nothing then

     else

         fl = dp("B") & ","

    endif

next