主题：[求助]关于列去重复值及跨表引用的问题

 写两段

Dim f As New Filler
f.SourceTable = DataTables("软件数据") '指定数据来源
f.SourceCols = "产品图号" '指定数据来源列
f.DataTable = DataTables("差异统计") '指定数据接收表
f.DataCols = "产品图号" '指定数据接收列
f.ExcludeExistValue = True
f.Fill() '填充数据

f = New Filler
f.SourceTable = DataTables("销售数据") '指定数据来源
f.SourceCols = "产品图号" '指定数据来源列
f.DataTable = DataTables("差异统计") '指定数据接收表
f.DataCols = "产品图号" '指定数据接收列
f.ExcludeExistValue = True
f.Fill() '填充数据