excel - 如何删除用/分隔的单元格中的重复值？

Question

我在 Excel 中有多个单元格，内容如下:

    b1= E4I8/E4I8/E4I8/E4I8
    b2=D3B2/B30C1/D3B2/D3B2/D3B2/B30C1


    multiple /xxxx/ 

如何删除同一单元格中的这些重复文本字符串？

谢谢

Answer 1

此函数使用字典的键从传入的字符串构建唯一的部分列表(添加对 Microsoft Scripting Runtime 的引用):

Public Function UniqueParts(separator As String, toParse As String) As String
    Dim d As New Scripting.Dictionary, part As Variant, i As Integer
    For Each part In Split(toParse, separator)
        d(part) = 1
    Next
    UniqueParts = Join(d.Keys, "/")
End Function

您可以在 Excel 公式中使用此函数:

=UniqueParts("/","E4I8/E4I8/E4I8/E4I8")

或使用单元格引用:

=UniqueParts("/",B2)

您还可以在迭代一系列单元格的宏中使用它。