如果只有一组相同的,用VBA:
sub()
for all = 1 to k'k为数据总行数
for i = 1 to 3
for j=i+1 to 4
if cells(i,all).value=cells(j,all).value then
cells(j,5).value=cells(i,all).value
goto one
end if
next
next
one:
next
end sub
.............
我测试楼上的,怎么得到的是字符串合并呢?
比如1、2、3、2,得到 的是1232 而不是2.
=a1&b1&c1&d1