在Excel中查找字符的第N个实例（无VBA）

Question

TL; DR摘要：我想要一个公式，该公式将在字符串中找到第N个“ _ ”（对于任何N），并返回其索引； 或找到第N个子字符串，用“ _ ”分隔。 我有VBA来执行此操作，但是速度很慢。

加长版：我正在处理广告活动数据。 我的营销人员（很幸运）在广告系列中使用了一致的命名方案。 不幸的是，这很长。

广告系列名称恰好包含我无法通过报告获得的1条数据。

供参考，广告系列名称的格式为：

ADV_CO_BG_Product_UniqueID_XX_mm.dd.yyyy_mm.dd.yyyy_TYP_NUM

...而我有一列约200K（每周增长几百）。

编辑：
重要的是，广告系列名称包含多个部分，其中_作为分隔符。 在这种情况下，我需要第9部分，但我需要一个足够灵活的选项，而不必添加或删除行来更改我定位的部分。

我在其他问题上也看到过使用嵌套公式，例如：

=MID(
  Data_OLV[@Campaign],
  FIND("_",Data_OLV[@Campaign],
    FIND("_",Data_OLV[@Campaign],
      FIND("_",Data_OLV[@Campaign],
        FIND("_",Data_OLV[@Campaign],
          FIND("_",Data_OLV[@Campaign],
            FIND("_",Data_OLV[@Campaign],
              FIND("_",Data_OLV[@Campaign],
                FIND("_",Data_OLV[@Campaign])+1)
              +1)
            +1)
          +1)
        +1)
      +1)
    +1)
  +1,
3)

...但是如果我需要其他位置的东西很难修改。

我有一个称为StringSplit的UDF（请参见下文），它提供了所需的结果，但是它非常慢（并且只有在启用了宏的情况下才起作用，但并非我的所有听众都可以这样做）。

有没有更好的方法来做我想做的事情？

    Public Function StringSplit(input_ As String, delimiter_ As String, index_ As Integer)
        On Error GoTo err

        out = Split(input_, delimiter_, -1, vbTextCompare)
        StringSplit = out(index_ - 1)
        Exit Function
    err:
        If err.Number = 9 Then
            StringSplit = CVErr(xlErrRef)
            Exit Function
        End If
        StringSplit = err.Description
    End Function

Answer 1

我认为这是您要寻找的公式-

=MID(A2, FIND(CHAR(1), SUBSTITUTE(A2, B2, CHAR(1), C2))+1, FIND(CHAR(1), SUBSTITUTE(A2, B2, CHAR(1), C2+1)) -  FIND(CHAR(1), SUBSTITUTE(A2, B2, CHAR(1), C2))-1)

这是怎么做的-

这里B2是Delimiter type ， C2是Delimiter type的Nth occurrence of the Delimiter 。 您可以根据需要修改代码。 只需更改B2和C2 。

Answer 2

例如，如果您要查找第三个实例？ 在单元格A1中 ，尝试：

=FIND(CHAR(1),SUBSTITUTE(A1,"?",CHAR(1),3))

注意：

我们假设CHAR(1)没有出现在原始字符串中。
要获取最后一个实例，请使用：

=FIND(CHAR(1),SUBSTITUTE(A1,"?",CHAR(1),(LEN(A1)-LEN(SUBSTITUTE(A1,"?","")))))

Answer 3

您是说，如果我是对的，那么您收到的数据始终采用您发布的格式，并且您始终希望提取TYP数据。

为什么不在字符串中搜索TYP ，并另外搜索NUM因为它表示以下子数据？

然后，您将得到一个公式，例如

=TRIM(MID(W20,SEARCH("TYP",W20),SEARCH("NUM",W20)-SEARCH("TYP",W20)))

在此公式中，单元格W20保存整个数据字符串。 当然，您可以编辑此范围，也可以将整个字符串粘贴到其位置。

编辑

由于OP提到标题字符串不一致：

=TRIM(MID(W20,SEARCH(A1,W20),IF(A2="",LEN(W20),SEARCH(A2,W20)-SEARCH(A1,W20))))

在单元格A1中将是必须提取的数据的标题字符串，在这种情况下为TYP

在单元格A2中将是下一个子数据的标题字符串。 如果为空，该公式将使用单元格A1返回从第一个SEARCH函数找到的所有字符。

Answer 4

正如Egan Wolf所说， http：//exceljet.net/formula/find-nth-occurrence-of-character =MID([@[Campaign]],FIND(CHAR(160),SUBSTITUTE([@[Campaign]],"_",CHAR(160),9))+1,4)

或更一般而言： =MID(TextToSearch,FIND(CHAR(160),SUBSTITUTE(TextToSearch,Delimiter,CHAR(160),InstanceNumber ))+1,LengthOfDesiredSection)

当然，可以通过第一个公式的一个子节找到LengthOfDesiredSection ，如下所示（为清楚起见添加了换行符）：

  =MID(TextToSearch,
   FIND(CHAR(160),SUBSTITUTE(TextToSearch,Delimiter,CHAR(160),InstanceNumber))+1,
   IFERROR(
  (FIND(CHAR(160),SUBSTITUTE(TextToSearch,Delimiter,CHAR(160),InstanceNumber+1)-
   FIND(CHAR(160),SUBSTITUTE(TextToSearch,Delimiter,CHAR(160),InstanceNumber)))-1,
   LEN(TextToSearch)-
   FIND(CHAR(160),SUBSTITUTE(TextToSearch,Delimiter,CHAR(160),InstanceNumber))))

IFERROR()可防止Delimiter在TextToSearch仅出现InstanceNumber次的TextToSearch 。

Answer 5

查找下划线定界字符串的第n个实例并返回该子字符串的一种方法是使用以下公式：

=TRIM(MID(SUBSTITUTE(A1,"_",REPT(" ",999)),MAX(1,999*(n-1)),999))

其中n是您要查找的实例。

但是，当然，这要求元素以相同的顺序出现，并且始终存在（或者如果不存在则用下划线代替）。

如果您使用的是带有FILTERXML函数的Excel版本，则可以使用以下公式：

=INDEX(FILTERXML("<t><s>" & SUBSTITUTE(A1,"_","</s><s>") & "</s></t>","//s"),n)

不知道在大型数据库上哪一个效率更高（更快）