如何在excel中获取以逗号分隔的值?

时间:2013-10-22 06:36:49

标签: excel csv excel-2007

我在这样的单元格中有一个值:1,2,3,4,5,6,7,8,9,10

以及2,4,5,9

等其他单元格

我想在所需的单元格中找到1,3,6,7,8,10之类的结果。

1 个答案:

答案 0 :(得分:0)

您是否愿意创建自己的功能?

我认为你想说的是你想要显示单元格1中“其他”单元格中找不到的唯一值...

基本上我的函数将通过“,”逗号分隔符将它分割为第一个单元格,并将每个值分配给一个Dictionary对象。然后它将以相同的方式通过第二个单元格,但如果该值存在于Dictionary对象中,则会将其删除...只留下唯一的项目,然后它将数组与逗号分隔符连接...

将以下代码放入模块中,并通过

在单元格中引用它
  

= GetUnique(A1,A2)

Public Function GetUnique(RangeA As Range, RangeB As Range)
Dim objDic As Object
Dim X As Variant

Set objDic = CreateObject("Scripting.Dictionary")
For Each X In Split(RangeA.Value, ",")
    If Not objDic.exists(X) Then
        objDic.Add X, objDic.Count
    End If
Next
For Each X In Split(RangeB.Value, ",")
    If objDic.exists(X) Then
        objDic.Remove (X)
    End If
Next
GetUnique = Join(objDic.keys, ",")
End Function