excel vba 查重

问：Excel vba 怎么实现查找两个工作簿之间重复的单元格并填充颜色？

1. 答：文件名错了吧
   文件名应该是cq61.xlsm ，你写成了.xlsx

问：求助！请高手赐教，我需要用一个VBA代码实现两列数据查重？

1. 答：直接在B列录入公式就能实现
   B1=IFERROR(MATCH(C1,A:A,0),"不重复")
   向下填充，在C列输入内容，如果重复了就会显示数字，指出重复数据在A列的位置，不重复就显示不重复
2. 答：是每输入一个就处理么！

问：在EXCEL中如何实现多列不同数据的查重？

1. 答：在H列建立A:C与E:G对对账标记，输入以下公式，然后向下填充公式
   =COUNTIFS(C:C,G1,A:A,"*"&LEFT(E1,3)&"*")
   得到1的说明左右符合，得0的说明不符合，如果得2或2以上，说明同列有重复。
    
   详见附图附件
    
   涂黑的地方可能是关键字，如果E列为“***”报，N列为“***”经手，那么建议在Excel表格中添加两列辅助列，分别获得E和N列的关键字，比如F列和O列为E列有N列的关键字，然后在R2和S2单元格分别输入以下公式，然后向下填充公式
   =COUNTIFS(H:H,P2,F:F,N2)
   =COUNTIFS(G:G,Q2,F:F,N2)
2. 答：你好，看了你的描述还是不能理解，表达思路可以在清晰点吗

问：excel去重

1. 答：假设号码在A列
   下面的公式把重复的值全去掉
   B1输入公式
   =if(countif(A:A,A1)>1,"",A1)
   B1公式向下复制
   下面的公式把重复值保留一个，其余的删除
   C1输入公式
   =if(countif(A$1:A1,A1)=1,A1,"")
   C1公式向下复制
2. 答：把号码列（比如A列）排序
   在一空列（比如F列）F2中输入
   =IF(A2=A1,1,0)
   下拉
   数据-筛选-自动筛选
   在F列筛选出所有1的项
   删除筛选出的行
3. 答：旁边插入两列，复制原数据到其中一列，后排序。空白列中使用 =if(a2=a3,"x","") 拖曳到最后,所有 “X”行删除，就好了 这是我最近的工作中常用的方法，希望对你有帮助。
4. 答：可以用高级筛选,也可以用数组公式.

问：如图，2个excel表，怎么查重数据，高亮显示或者提取出来？

1. 答：Excel以单元格为最小单元的，你说的肉眼能看到的是单元格中的内容，而Excel对比是按单元格，两个单元格的内容完全一样，才是重复的。
   这么内容在一个单元格中，就是VBA也困难有些麻烦。
   还是先分列吧，使每个单元格中的只一个城市名，再按要求去比较
2. 答：什么是你希望的高亮？比如这样吗文字颜色变化吗？
   单个文字没法设置高亮（也就是底色变化），所以只能按改变字体颜色的方法来突出显示。
   你也没回答，那就随便写段代码吧。