以下に、指定された区切り文字に基づいてテキストを複数の部分に分割するのに役立つ関数を示します。
マクロを追加するには、Visual Basic エディター (Alt+F11) を開きます。 入れる 新しい空のソフトウェア モジュール
Function GETSUBSTR(Txt, Delimiter, n) As String 'moonexcel.com.ua 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(テキスト; 区切り文字; フラグメントのシーケンス番号)
どこ: