Excel中。 合并列并删除重复项

有列A – H的数据,可能会或可能不会在每个列中重复,我希望从列合并到一列删除重复的数据。

这可能与公式或做一个需要macros/ VBA?

我宁愿公式,因为后来不是我的力量(既不是第一;-))

Google表格使用以下公式来实现此目的:

=sort(unique({A:A;B:B})) 

在这里输入图像说明

也许有一个Excel相当于?

试试这个macros在VBA中,select列,然后按(Alt + F11),并在该表的模块粘贴此代码:

 Sub MakeOneColumn() Dim vaCells As Variant Dim vOutput() As Variant Dim i As Long, j As Long Dim lRow As Long If TypeName(Selection) = "Range" Then If Selection.Count > 1 Then If Selection.Count <= Selection.Parent.Rows.Count Then vaCells = Selection.Value ReDim vOutput(1 To UBound(vaCells, 1) * UBound(vaCells, 2), 1 To 1) For j = LBound(vaCells, 2) To UBound(vaCells, 2) For i = LBound(vaCells, 1) To UBound(vaCells, 1) If Len(vaCells(i, j)) > 0 Then lRow = lRow + 1 vOutput(lRow, 1) = vaCells(i, j) End If Next i Next j Selection.ClearContents Selection.Cells(1).Resize(lRow).Value = vOutput End If End If End If End Sub 

然后按F5执行macros。