excel 去重函数

Question

如图，我要去掉图示表格中相同的文字，并且要合并在后面一列表格中。该用什么函数。求应用公式。
http://pan.baidu.com/s/1hqeNKfa

EXCEL文件下载处

Answer 1

这不是用函数做的事情了 用操作和vba

操作就是所有数据粘贴到一列 然后透视表即可

你传个附件上来

vba在表里alt+F11 粘贴下面代码 F5运行即可

Sub 区域去重()    '字典用法一

Sub 区域去重()    '字典用法一
'活动工作表中有效区域所有数值去重 写入到最后一列
    Dim d, arr, a
    Set d = CreateObject("scripting.dictionary")
    arr = ActiveSheet.UsedRange
    On Error Resume Next
    For Each a In arr
        If Not d.Exists(a) Then d.Add a, Nothing
    Next
    Cells(1, UBound(arr, 2) + 1).Resize(d.Count) = Application.Transpose(d.keys)
End Sub

 

Answer 2

在N2单元格输入公式：

=INDIRECT(TEXT(MIN(IF((COUNTIF(N$1:N1,A$2:L$50)=0)*(A$2:L$50<>""),ROW(A$2:L$50)*1000+COLUMN(A$2:L$50),65536256)),"R0C000"),0)&""

公式以CTRL+SHIFT+ENTER三键结束。

将公式向下复制。

 

追问

怎么不见效

输出的这样

追答

这是数组公式，
公式要以CTRL+SHIFT+ENTER三键结束。

追问

要的了，多谢。

本回答被提问者采纳

Answer 3

请提供文件
1722187970追问

请下载 http://pan.baidu.com/s/1hqeNKfa

Answer 4

excel去重 教你完成追问

试过，没教程及方式！

追答

我可以教你 2140586

Answer 5

使用统计汇总试试。
没太明白你想要做什么？追问

就是把重复的去除。然后把他们汇总一列或一行挨个排下去。