求助，怎么判断一列单元格的数据是否重复，判断结果赋给另

真心求助

可能是字典最简单，需要设定一个判断标准；
上面代码是假设判断的标准是c2单元格，其他单元格与c2比较。
dim zd as object '定义字典对象
set zd=createobject("scripting.dictionary") '创建字典
s=cells(2,3) '读取 c2
zd(s)=s '写入字典，只有左边的key是有用的，右边的item没用，随便写什么都行
for i=3 to [c10000].end(3).row '从第3行循环c列
s=cells(i,3) '读c列
if zd.exists(s) then '字典已存在，表示重复
.... '写入信息，这里你添加自己的代码
else
.... '字典不存在，表示不重复，写入你自己的代码
endif
next i
如果c列并没有统一的判断标准，那你这个问题我认为就不严谨，没有标准就没法判断谁是谁非。