【ﾕｰｻﾞ定義関数】区切った文字は何？

◆構文

　uSplit(文字列, 区切文字, 番号)

◆解説

ある区切り文字で区切られた文字列を、その区切り文字で区切り、区切られた各文字列を、一次元配列型に格納し、その番号となる文字列を返します。

◆ソースコード

Function uSplit(文字列 As String, 区切文字 As String, 番号 As Integer)
    Dim myStr As String, myData
    myData = Split(文字列, 区切文字)
    SplitTxt = myData(番号 - 1)
    uSplit = SplitTxt
End Function

◆補足
言葉で表すとややこしいですが、例えば、
　文字列 = "①茨城県②栃木県③群馬県④埼玉県⑤千葉県⑥神奈川県"
　区分　=  "県"
　番号    =  3 (番目)
とすると
　uSplit("①茨城県②栃木県③群馬県④埼玉県⑤千葉県⑥神奈川県", "県", 3)
は
　③群馬
を返します。

◆登録方法