Excel找出两列相同值的VBA宏代码

以下的宏代码,其功能是,找到AB两列相同值,并存放到C列。

Sub MySubSearch()

Dim i As Integer

Dim c As Range

For i = 2 To Sheet1.[B65536].End(xlUp).Row

For Each c In Sheet1.Range("A2:A" & Sheet1.[A65536].End(xlUp).Row)

If Cells(i, 2).Value = c Then Cells(i, 2).Font.ColorIndex = 3

Next c

If Cells(i, 2).Font.ColorIndex = 3 Then _

Cells(Sheet1.[C65536].End(xlUp).Row + 1, 3).Value = Cells(i, 2).Value

Next i

MsgBox "所有重复编号已经找出,请查看结果!"

End Sub

(0)

相关推荐

  • Excel如何找出两列数据中的不同项

    Excel文档常常被用来统计各类数据,有些用户想知道Excel如何找出两列数据中的不同项,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步打开电脑中的Excel文档 ,根据下图所示 ...

  • excel表中如何快速找出两列数据中的不同项

    excel表输入数据时,经常需要对比两列数据的差异,单靠肉眼看是很难选出来的,这时候就需要一些小技巧了,那么excel表中如何快速找出两列数据中的不同项呢?下面介绍3种excel表中快速找出两列数据中 ...

  • Excel如何找出两列相同和不同的姓名

    目前有两列姓名,我们要将相同和不同的姓名对比出来,用什么方法能最快的速度对比出来呢,今天小编就总结了三种方法,供大家参考. 操作方法 01 要求对比H列和J列,找出两列相同和不同的姓名. 方法一: 首 ...

  • EXCEL怎么找出两列中不同的项

    有很多朋友都会想找出两列数据中不同的项,其实还比较简单,只要用到一个小小的函数就好了. 操作方法 01 在这两列数据旁边建立辅助列: 02 在辅助列的单元格里面输入函数:=IF(ISERROR(VLO ...

  • Excel中如何找出两列数据中不重复的记录

    小易在工作中经常会遇到这样的需求:现在有两列数据,要在 A 列中找出 B 列中没有的记录,在 B 列中找出 A 列中没有的记录.现在和大家分享一下这个方法. 我们先用一个简单的例子看一下.现在有两列数 ...

  • Excel中如何找出两列数据中相同的数据简单方法

    操作方法 01 新建工作表如图 02 插入列 03 输入公式=A1=B1回车,回车后会返回结果true  向下拉动格式就可以了 结果如图5 04 最后以添加的这一列排序  这样就可以选择出两列相同的项 ...

  • excel如何找出两列数据中不相同的项?

    excel是我们工作中最常用的工具之一,在实操中有着众多的技巧,本文将介绍,不同的人同时记账,最后发现数据有差异,需要核对数据,找出差异项,小编告诉大家使用一个简单的方法核对,不需要使用复杂的函数. ...

  • 如何在excel中对两列的值进行加减乘除运算

    excel软件是绝大部分学生.白领.教职工以及公务员等等用到的表格工具,人们在excel中可以设置一些工具来节省大量的时间,提高工作效率.在工作和学习,甚至在生活中都是我们的好帮手,更不用说专门靠这个 ...

  • Excel中如何找出两列数据中相同的数据?

    操作方法 01 一.用Excel中的"条件格式" 1.选中C2:E10区域,打开"条件格式",选择"新建规则",选择"仅对唯一值或 ...