指定された区切り文字によるテキストの自動分割

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(テキスト; 区切り文字; フラグメント シーケンス番号)

どこ：

• 文章 - フラグメントを抽出する予定のセル内のテキスト。
• ディバイダー - テキストを分割するための記号。
• フラグメントのシーケンス番号 - どのフラグメントを取得するかを示す番号。

トピックに関する記事:

• テキストを複数の列に分割する
• テキストから一部の文字を抽出（LEFT、RIGHT、MID）
• 異なるセルのテキストの連結 (CONCATENATE)
• 条件によるテキストの連結 (CONCATIF)