excel - 从单元格中删除重复值

Question

我在单元格中的数字有时会重复。

例如：

我希望每个数字都显示一次，删除重复项。有没有公​​式可以轻松做到这一点？请不要使用多个辅助单元格。

标签： excel

Answer 1

这适用于 Excel 356。

选择单行的一部分并运行这个简短的宏：

Sub rm_dups()
    Dim rng As Range
    Set rng = Selection
    If rng.Rows.Count > 1 Then Exit Sub
    
    With Application.WorksheetFunction
        arr = .Unique(rng.Value, True)
    End With
    
    rng.Clear
    rng.Resize(1, UBound(arr)).Value = arr
End Sub

前：

之后：