根据Microsoft Excel中A列中的值删除B列中的重复项
我在列A中轻松地删除了重复项,但是现在我的值已经超过了A1048576,现在除了使用列B之外,现在我不能删除B列中的重复值。我该怎么做? 如何将列A,B,C等视为一个/单列。
假设我的列A和B有这些值
AB ak bl ca df er fg
正如你所看到的,列B的值a和f也存在于列A中,所以我想删除a和f。
感谢您在这方面的帮助和合作。
您可以使用VBA遍历所有单元格,但由于数据单元格的大小,可能需要一段时间才能运行。 像这样的东西可以工作:
Sub RemoveDuplicates() Dim rng As Range Dim x as Long Application.Calculation = xlCalculationManual Application.ScreenUpdating = False Set rng = ThisWorkbook.Sheets("SheetName").Range("A2:C1048576") For x = rng.Cells.Count To 1 Step -1 If WorksheetFunction.CountIf(rng, rng(x)) > 1 Then rng(x).Delete xlShiftUp End If Next x Application.Calculation = xlCalculationAutomatic Application.ScreenUpdating = True End Sub
上面的子程序会转换这个:
AB ad ad ae be bf cc
进入这个:
AB ad be cf