如何在Excel的列中获取唯一/唯一值？

如果我有一列包含值的列，并且想找出其中有什么不同的值（不是多少-而是实际的不同值），该怎么办？

在SQL Server中，我会做类似的事情

SELECT Distinct(MyColumn) FROM MyTable

比您想像的要简单：

• 单击数据功能区菜单
• 在“ 排序和过滤器”部分中选择“ 高级”按钮
• 填写对话框，将结果复制到另一个位置，并确保选中“仅唯一记录”

Excel 2007和2010：
使用Remove Duplicates“ 数据”标题下的菜单选项。

Excel 2003：
简单方法：

1. 确保您的数据具有标题
2. 数据->过滤器->高级过滤器
3. 仅检查唯一记录
4. 选择复制到另一个位置
5. 点击确定

艰辛的道路：

用以下代码编写宏：

'Remove duplicates from sorted list
Sub getDistinct()
    Do While ActiveCell.Value <> ""
        If ActiveCell.Value = ActiveCell.Offset(1, 0).Value Then
            ActiveCell.Select
            Selection.Delete Shift:=xlUp
        Else
            ActiveCell.Offset(1, 0).Activate
        End If
    Loop
End Sub

这为您提供了独特的列表。您可能需要先将列表复制到另一张纸上。

我使用两种主要方法来获取不同的值-第一种是Nathan DeWitt建议的无价Remove Duplicates工具。

不利的一面Remove Duplicates是您丢失了数据。尽管具有Ctrl+的功能z，但由于各种原因，您可能不希望执行此操作-例如，您可能当前选择了一些过滤器，这些过滤器使删除重复项以获取不同的值列表非常麻烦。

上面未提及的另一种方法是使用数据透视表。

假设这是您的表，并且您想要获得不同的平台列表。

插入一个Pivot Table带有表的数据源。

现在，选择“ 平台”列作为Row Labels。

瞧！不同值的列表。

如果您希望整理一下，可以将其关闭Field Headers并设置Grand Totals为Off for Rows and Columns。

或（一种简单的粗略方法）：

在B1中

=IF(COUNTIF(A$1:A1,A1)=1,A1,"") 

然后抄下来 它只是复制每个值的第一次出现（在出现该值的行中）。

或者您可以在宏中包含过滤器选项

    Columns("A:A").AdvancedFilter Action:=xlFilterInPlace, Unique:=True

对我来说，最简单的排序方式是使用“过滤器”选项。

第一步是使用条件格式->突出显示单元格规则->重复值来查找重复值。

然后单击具有重复项的列上的箭头（在本例中为“平台”）->按颜色过滤（单元格颜色或字体颜色）。