Join関数とSplit関数で配列を文字列に文字列を配列にしてみただけ【ExcelVBA】

■Join関数 配列に含まれている文字列を結合 （文字列の配列、区切り文字）

引数 sourcearray → 結合したい文字列の配列 delimiter → 結合する時の区切り文字 ※省略した場合" "（半角スペース）

■Split関数 逆に文字列を配列（一次元）に分割する関数 （分割したい文字列、区切り文字）

引数 expression → 分割したい文字列 delimiter → 分割する時の区切り文字 ※省略した場合" "（半角スペース）

ｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰｰ

実際に使用したサンプルコード

Public Sub sample()

'配列を用意
Dim 配列() As String

'変数を文字列型で用意
Dim 変数 As String

'カウンタ用変数を用意
Dim i As Integer

For i = 34 To 36

'変数にセルの値を入れる
変数 = Cells(i, 2).Value

'分割して配列に
配列 = Split(変数, "-")

'配列をセルに合わせて入れる
Cells(i, 5).Resize(1, UBound(配列, 1) + 1).Value = 配列

Next

End Sub