有多少数据 过多导致运行缓慢 我不负责哦
使用宏(记得先排序,按B列)
for i=1 to 3
a1=cells(i,2)
if a1="" then
exit for
else
if range("a:a").find(a1) is nothing then
else
b1=range("a:a").find(A1).rows.row
if cells(b1,1)=a1 then
cells(i,3)="有重复")
else
endif
endif
i=i-1
endif
next
草草 改过一次