[ExcelVBA] Split関数

>Blog Top Page >[ExcelVBA] Top Page >[ExcelVBA] 関数一覧

■構文
Split(expression[, delimiter[, limit[, compare]]])

■説明
区切り文字を含む文字列を受け取り1次元配列を返す
第一引数：区切り文字を含む文字列を指定
第二引数：(省略可能)区切り文字を指定。省略した場合スペースが使用されます。
第三引数：(省略可能)返す配列の要素数を指定。-1を指定するとすべての文字列を含んだ配列を返す。
第四引数：(省略可能)文字列比較の比較モードを指定。省略時、Option Compareステートメントの設定にしたがいます。

定数	値	説明
vbUseCompareOption	-1	Option Compare ステートメントの設定を使用して比較を行います。
vbBinaryCompare	0	バイナリ モードの比較を行います。
vbTextCompare	1	テキスト モードの比較を行います。

■サンプルコード

view plainprint?

1. Option Explicit  
2.   
3. Sub SampleCode()  
4.     Dim str As String, result As Variant  
5.       
6.     str = "a,b,c"  
7.     result = Split(str, ",") 'aとbとcの3要素をもつ配列  
8.       
9.     str = "1 2 3"  
10.     result = Split(str) '1と2と3の3要素をもつ配列  
11.       
12.     str = "abcde"  
13.     result = Split(str, "") 'abcdeの1要素をもつ配列  
14. End Sub  

Option Explicit

Sub SampleCode()
    Dim str As String, result As Variant
    
    str = "a,b,c"
    result = Split(str, ",") 'aとbとcの3要素をもつ配列
    
    str = "1 2 3"
    result = Split(str) '1と2と3の3要素をもつ配列
    
    str = "abcde"
    result = Split(str, "") 'abcdeの1要素をもつ配列
End Sub

>Blog Top Page >[ExcelVBA] Top Page >[ExcelVBA] 関数一覧