主题：[求助]

用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