主题：[求助]筛选表单里归属分类

 产品表中，商品名称列中的数据如下：
新货美国自然开口盐焗开心果总重500g原味无漂白零食坚果干果特产
新疆特产薄皮大核桃500g*3袋孕妇零食干果原味生坚果批发纸箱装
东北长白山野生红松子仁 开口松子 干果炒货手剥坚果新货

另一个数据表的“产地”列中，会列出：美国、新疆、东北、北京、上海....

我需要在产品表中，将每个商品名称中，一 一对应出各自归属于哪个产地，求助这个代码应如何写

 这个循环代码不会写，嘿嘿

你好！
感谢您的代码帮助。

Dim flt As String Dim cds As String()={"美国","新疆","东北","北京","上海"}           此处的数组来自“数据表”－－－“产地”列，如何写这个代码？ For Each cd As String In cds     flt="[商品名称] Like '%" & cd & "' Or " & "[商品名称] Like '" & cd & "%' Or " & "[商品名称] Like '%" & cd & "%' Or " & "[商品名称] Like '" & cd & "'"     DataTables("产品表").ReplaceFor("产地",cd,flt)     flt="" Next