Question

domain @ dcsad，domain @ ddcsf，domain1 @ dcsr，domain @ dcsw，domain @ ddcsf，domain @ dcswb

这就是我所拥有的并且想要在所有这些中的“@”符号之后提取信息并返回值，如果可能的话，在单个单元格中的值之间用“，”分隔？

请帮助！

Answer 1

如果单元格 A1 包含文本字符串：

domain @ dcsad，domain @ ddcsf，domain1 @ dcsr，domain @ dcsw，domain @ ddcsf，domain @ dcswb

然后是简单的用户定义函数：

Public Function Domains(st As String) As String
    ary1 = Split(st, ",")
    Domains = ""
    For i = LBound(ary1) To UBound(ary1)
        v = Split(ary1(i), "@")
        If Domains = "" Then
            Domains = v(1)
        Else
            Domains = Domains & "," & v(1)
        End If
    Next i
End Function

将返回：

dcsad，ddcsf，DCSR，DCSW，ddcsf，dcswb

到一个单元格。

Answer 2

另一种方法是将带有@和,的文本应用于列作为分隔符，删除每隔一列并将结果与连接组合在一起，如下所示：

=G3&", "&H3&", "&I3&", "&J3&", "&K3&", "&L3

使用MID，Find，IF

2 个答案: