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

对不起，如果这之前已经问过。 我真的不知道要找什么。 我有一个Excel专栏，其中列的AI有这样的东西

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 

我知道如何在一列中find一个词，但我不知道如何find所有不同的词。 是否有捷径可寻？

Answer 1

试试这个：

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

编辑＃1：

为了摆脱空间，请使用它来代替：

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

Answer 2

在“数据”标签下，select“删除重复”。

Answer 3

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

Excel 2010 RemoveDuplicates的Microsoft MSDN参考