在特定列中查找每个不同的单元格值

Question

抱歉，如果之前有人问过这个问题。我真的不知道要寻找什么。我有一个 excel sheet，在 A 列上我有一个看起来像这样的东西

       A
________________  
1 |  Banana
2 |  Banana
3 |  Banana
4 |  Banana
5 |
6 |  Potato
7 |  Potato
8 |  Potato
9 |  Potato
10|
11|  Noodles
12|  Noodles
13|  Noodles
14|  Noodles

但是我想改成

       H
________________  
1 |  Banana
2 |  Potato
3 |  Noodles

我知道如何在列中找到一个词，但我不知道如何找到所有不同的词。有没有简单的方法来做到这一点？

Answer 1

在 "Data" 选项卡下，选择 "Remove Duplicates"。

Answer 2

VBA 方法 RemoveDuplicates 对 Range 进行操作，并执行与菜单选项相同的操作。

Microsoft MSDN Reference for Excel 2010 RemoveDuplicates

Answer 3

试一试：

Sub Macro1()
    Selection.Copy
    Range("A1:A12").Copy Range("H1")
    ActiveSheet.Range("$H:$H").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub

编辑#1：

要去掉空格，请改用这个：

Sub Macro1()
    Selection.Copy
    Range("A1:A12").Copy Range("H1")
    Range("$H:$H").RemoveDuplicates Columns:=1, Header:=xlNo
    Range("$H:$H").Cells.SpecialCells(xlCellTypeBlanks).Delete
End Sub

在特定列中查找每个不同的单元格值

Find each different cells value in a specific column

excel

vba

excel-2010