F019 カンマ区切りの文字列から順番を指定して値を取り出す関数

　セル内のカンマ区切りの文字列から順番を指定して値を取り出す関数です。
VBEの標準モジュールに下のコードを登録して「Excelマクロ有効フォーム」で保存してください。
関数の登録方法は⇒♯000 ユーザー定義関数を登録する方法

登録されたら、シート上からユーザー関数「CoSplit 」が使用できます。
使い方は　
ワークシート上で　= CoSplit (文字列)の関数として使用できます。
【例】
　 CoSplit (“aaa,bbb,ccc”,2) → bbb
　※カンマ区切りの2番目の値、bbbに変換されます。

Function CoSplit(S, Optional R As Long)
’カンマ区切りの文字列から順番を指定して値を取り出す関数
’ CoSplit(文字列, 取り出す文字列の位置)
’ CoSplit(“aaa,bbb,ccc”,2) →　bbb
On Error GoTo EXITFUN
Dim A As Variant
A = Split(S, “,”)
If R = 0 Then
　CoSplit = A(0)
ElseIf R – 1 <= UBound(A) And R >= 1 Then
　CoSplit = A(R – 1)
Else
　CoSplit = “”
End If
EXITFUN:
End Function

ここで紹介したコード使用による損害に対しては一切責任は負えません。