按给定分隔符自动分割文本

LibreOffice

GETSUBSTR() 描述

下面您将找到一个函数，可以帮助您根据指定的分隔符将文本拆分为多个部分。

VBA 宏代码

要添加宏，请打开编辑器 Visual Basic (Alt+F11)，插入一个新的空程序模块（Insert - Module）并将该函数的文本复制到那里：

Function GETSUBSTR(Txt, Delimiter, n) As String
   Dim x As Variant
      x = Split(Txt, Delimiter)
      If n > 0 And n - 1 <= UBound(x) Then
        GETSUBSTR = x(n - 1)
      Else
        GETSUBSTR = ""
      End If
End Function

保存并返回Excel。现在，在自定义函数中，您可以找到我们的 GETSUBSTR() 函数。

GETSUBSTR(文本；分隔符；片段序列号)

在哪里：

文本 - 我们计划从中提取片段的单元格中的文本；
分隔线 - 我们用来划分文本的符号；
片段的序列号 - 一个数字，它将显示我们想要获取哪个片段的顺序。

有关该主题的文章：