首页 文章

EXCEL VBA比较2列和删除重复行

提问于
浏览
-2

我需要比较2列中的相同值并删除下面描述的重复行:

A   B

1 5   A 
2 6   B
3 7   C
4 5   A
5 6   A
6 7   C

2列中的行4和6是相同的,必须在运行宏后删除 . 我在网上搜索但是找不到用真正的数学删除正确的行 . vba之后的表格应该是:

A   B

1 5   A 
2 6   B
3 7   C
4 6   A

提前致谢

1 回答

  • 2

    除非我遗漏了某些内容,否则您无需使用VBA来执行此操作 .

    您可以使用“数据”选项卡中的“删除重复项”功能 .

    示例:

    我有以下内容:

    enter image description here

    当您比较A列和B列时,您可以看到行13,14,15和16是重复的 .

    解决方案:

    突出显示完整的A&B列,然后运行“删除重复项”功能 . 根据您的 Headers ,系统会提示您输入与此类似的内容 .

    enter image description here

    确保选中了两个列,然后单击“确定”按钮 .

    我的结果如下:

    enter image description here

    如果您确实需要在VBA中完成此操作,那么在运行宏 Logger 时我会得到以下代码:

    Sub Macro1()
    
        Columns("A:B").Select
        ActiveSheet.Range("$A$1:$B$16").RemoveDuplicates Columns:=Array(1, 2), Header _
            :=xlNo
    End Sub
    

    您应该能够编辑它以满足您的需求 .

相关问题