跨表模糊查询提取产品基本信息

天边2021

3190496160 发表于 2023-5-19 22:33
Sub chaxun()
Dim ar As Variant
Dim br()

到达想要的效果，速度很快，有点一样就是未去重复值

天边2021

3190496160 发表于 2023-5-19 22:33
Sub chaxun()
Dim ar As Variant
Dim br()

结果未去重复值，有点遗憾

zpy2

天边2021 发表于 2023-5-19 23:09
结果未去重复值，有点遗憾

列自动编号若系统数据工作表有多条相同的产品基本信息，查询结果显示唯一值即可

数量不同算重复？

天边2021

zpy2 发表于 2023-5-20 08:20
列自动编号若系统数据工作表有多条相同的产品基本信息，查询结果显示唯一值即可

数量不同算重复？

不考虑数量，只取 物料编码  名称  规格型号、批号 生产日期 这五个字段组合的唯一值

3190496160

天边2021

3190496160 发表于 2023-5-20 08:37

    非常感谢！