Question

我想删除，删除Excel列中的重复项。我知道如何删除重复的行，但不知道是否有任何方法可以使用列？

我的Excel表格：

Name AA BB CC DD AA CC   
ID   11 22 33 44 11 33


Name AA BB CC DD  
ID   11 22 33 44

Answer 1

我的评论有点不对，因为即使仅限于工作表函数也可以解决这个问题。

但是，这是使用transpose的快速和肮脏版本：

Public Sub demo()
  On Error Resume Next
  Application.ScreenUpdating = False
  With Range(Cells(1, 1), Cells(1000, 1000))
   .Cells = WorksheetFunction.Transpose(.Cells)
   .Cells.RemoveDuplicates Columns:=Array(1), Header:=xlYes
   .Cells = WorksheetFunction.Transpose(.Cells)
  End With
  Application.ScreenUpdating = True
End Sub

您应该尝试一下，尽管这对于较小的数据集来说更像是一种解决方案。这需要一段时间，但确实有效。

删除重复的excel列

1 个答案: