如何在Excel中通过比较两列中的数据来查找重复项

如何在Excel 中通过比较两列中的数据来查找重复项 方法1：使用工作表公式

要使用工作表公式来比较两列中的数据，请按照下列步骤操作： 输入下面的数据（保留列B 为空）： A1:1 B1: C1: 3 A2:2 B2: C2: 5 A3:3 B3: C3: 8 A4:4 B4: C4: 2 A5:5 B5: C5: 0

在单元格B1 中键入以下公式：

=IF(ISERROR(MATCH(A1,$C$1:$C$5,0)),\"\

///=IF(ISERROR(VLOOKUP(B1,$A$1:$A$30,1,0)),\"不一样\一样\")

选择单元格B1:B5。

在编辑菜单上，指向填充，然后单击向下填充。 重复的数字显示在列B 中，如下所示： A1:1 B1: C1: 3 A2:2 B2:2 C2: 5 A3:3 B3:3 C3: 8 A4:4 B4: C4: 2 A5:5 B5:5 C5: 0

方法2：使用Visual Basic 宏

Microsoft 提供的编程示例只用于说明目的，不附带任何明示或默示的保证。这包括但不限于对适销性或特定用途适用性的默示保证。本文假定您熟悉所演示的编程语言和用于创建和调试过程的工具。Microsoft 的支持工程师可以帮助解释某个特定过程的功能，但是他们不会修改这些示例以提供额外的功能或构建过程以满足您的特殊需求。要使用Visual Basic 宏比较两列中的数据，请按照下列步骤操作：

按Alt+F11 启动Visual Basic 编辑器。 在插入菜单上，单击模块。 在模块表中输入下面的代码： Sub Find_Matches()

Dim CompareRange As Variant, x As V ariant, y As Variant ' Set CompareRange equal to the range to which you will ' compare the selection.

Set CompareRange = Range(\"C1:C5\")

' NOTE: If the compare range is located on another workbook ' or worksheet, use the following syntax. ' Set CompareRange = Workbooks(\"Book2\"). _ ' Worksheets(\"Sheet2\").Range(\"C1:C5\") '

' Loop through each cell in the selection and compare it to ' each cell in CompareRange. For Each x In Selection For Each y In CompareRange If x = y Then x.Offset(0, 1) = x Next y Next x End Sub

按Alt+F11 返回Microsoft Excel。 输入下面的数据（保留列B 为空）： A1:1 B1:C1: 3 A2:2 B2:C2: 5 A3:3 B3:C3: 8 A4:4 B4:C4: 2 A5:5 B5:C5: 0 选择区域A1:A5。

在工具菜单上，指向宏，然后单击宏。单击Find_Matches，然后

单击执行。重复的数字显示在列B 中。匹配的数字将放在第一列的旁边，如下所示：A1:1 B1: C1: 3

A2:2 B2:2 C2: 5 A3:3 B3:3 C3: 8 A4:4 B4: C4: 2 A5:5 B5:5 C5: 0