For Each ar As Row In Tables("大货用料表").rows
For Each br As Row In Tables("款式颜色").rows
Dim nr = Tables("配色表").addnew()
nr("款号") = ar("款号")
nr("物料ID") = ar("物料基本信息_物料ID")
nr("物料名称") = ar("物料基本信息_物料名称")
nr("颜色信息") = br("颜色")
Next
Next
要加条件:如果配色表已经生成过了交叉行信息(配色表已经存在此物料,同时存在此物料包括的款式颜色表里的所有颜色),则不再重新生成,条件如何写?