在Excel的C1单元格中，如何从A列中选择未在B1单元格中的以彗差分隔的值列表中找到的以彗差分隔的单元格/值？

在Excel的单元格C1中，如何使用公式从列a中的所有行中选择一个由所有缺失单元格组成的以逗号分隔的字符串，该列中的值在单元格B1中以逗号分隔的值列表中找不到？

请尝试以下用户定义的函数：

Option Explicit

Public Function WhatsMissing(rng As Range, css As String) As String
    Dim rngT As Range, ws As Worksheet, cssT As String
    Dim r As Range, v As String, vT As String
    
    Set ws = rng.Parent
    Set rngT = Intersect(rng, ws.UsedRange)
    
    cssT = "," & css & ","
    WhatsMissing = ""
    
    For Each r In rngT
        v = r.Value
        If v <> "" Then
            vT = "," & v & ","
            If InStr(cssT, vT) = 0 Then
                WhatsMissing = WhatsMissing & v & ","
            End If
        End If
    Next r
    
    WhatsMissing = Mid(WhatsMissing, 1, Len(WhatsMissing) - 1)
End Function

选项显式
公共函数WhatsMissing（rng作为范围，css作为字符串）作为字符串
标注rngT作为范围，ws作为工作表，cssT作为字符串
变暗r为范围，v为字符串，vT为字符串
设置ws=rng.Parent
设置rngT=Intersect（rng，ws.UsedRange）
cssT=“，”&css&“，”
WhatsMissing=“”
对于rngT中的每个r
v=r.值
如果v“那么
vT=“，”&v&“，”
如果仪表（cssT，vT）=0，则
WhatsMissing=WhatsMissing&v&“
如果结束
如果结束
下一个r
WhatsMissing=Mid（WhatsMissing，1，Len（WhatsMissing）-1）
端函数

例如：

配方溶液

在C1中，输入数组公式（Ctrl+Shift+enter）：

---

非常简单的问题。大概是吧？……美丽的公式。。。。。。。。。。。。。。。。。。。。。。。。

=TEXTJOIN(",",1,IF(ISERR(SEARCH(A1:A6,B1)),A1:A6,""))