如下，将项目一个列中的内容，变成缩减后的内容



序号    缩减前                    缩减后
1        喝奶茶 小鹿                 奶茶   
2        吃火锅 海底捞                 火锅   
3        喝奶茶 蜜雪冰城             奶茶   
4        吃火锅 大吉利                 火锅   

for i = 2 to [a65536].end(3).row
  cells(i,3)=right(split(cells(i,2)," ")(0),2)
next

感谢大佬，这个特别好，又学到了一点。想问还有没有其它的方式呢，如果检索字段不是第二第三个字，能不能用奶茶，火锅去匹配，然后保留可以吗？怎么写呢？

需要建立字典匹配库
ar=[a1].currentregion
for i = 1 to ubound(ar)'装入字典
  d(ar(i,1))=""
next
for i = 2 to [a65536].end(3).row
  for k = 0 to d.count-1
    if instr(cells(i,2),d.keys()(k))>0 then cells(i,3)=d.keys()(k):exit for
  next
next

好的  谢谢哥

好好学习中