Question

excel 表格只能对一行或者一列去重。如何对整个表格去重？

excel 表格只能对一行或者一列去重。如何对整个表格去重，数据-去重已经用了，不管用。我的表格都是电话号码，怎么针对表格里所有的电话号码去重，只留一个号码？求大神说详细

Answer 1

这些看似复杂的工作，在VBA面前非常简单，下图是我的例子数据：

我输入的程序如下图：

程序执行完毕后，所有数字只保留首次出现的情况，重复出现时被清空，如下图：

然后CTRL+G定位空单元格后删除即可。

文本的程序代码如下，你可以粘贴使用：

Option Explicit

Sub 全表去重()

    Dim db, arr, i, j

    Set db = CreateObject("Scripting.Dictionary")

    arr = ActiveSheet.UsedRange

    For i = 1 To UBound(arr)

    For j = 1 To UBound(arr, 2)

        If db.Exists(arr(i, j)) Then arr(i, j) = "" Else db.Add arr(i, j), True

    Next j, i

    ActiveSheet.UsedRange = arr

End Sub

Answer 2

PQ中逆透视，去重。很方便的。

Answer 3

网页链接

网页链接

这两个可以嘛？

Answer 4

有几行几列