変数が配列かどうかをチェックする（ IsArray 関数）

サイト管理人

9年前

IsArray 関数の使い方

【書式】

result = IsArray( varname )

【引数・戻り値】

varname ・・・調べる変数
result ・・・引数 varname が配列かどうかを調べた結果
（ブール型：配列の場合は、True ／配列以外の場合は、False ）。

IsArray 関数の使用例

サンプルVBAソース

　

Sub Sample_isarray()

    
    Dim myArr(2), myVa1, myVa2, myNum, myStr
    
    myArr(0) = "あ"
    myArr(1) = "い"
    myArr(2) = "う"
    
    myStr = "A,B,C,D,E,F,G"
    
    myVa1 = Array(1, 2, 3, 4, 5)
    
    myVa2 = Split(myStr, ",")
    
    myNum = 20
    
    
    MsgBox "myArr：" & IsArray(myArr) & Chr(13) & _
           "myVa1：" & IsArray(myVa1) & Chr(13) & _
           "myVa2：" & IsArray(myVa2) & Chr(13) & _
           "myStr：" & IsArray(myStr) & Chr(13) & _
           "myNum：" & IsArray(myNum)


End Sub

Sub Sample_isarray()

Dim myArr(2), myVa1, myVa2, myNum, myStr

myArr(0) = "あ"

myArr(1) = "い"

myArr(2) = "う"

myStr = "A,B,C,D,E,F,G"

myVa1 = Array(1, 2, 3, 4, 5)

myVa2 = Split(myStr, ",")

myNum = 20

MsgBox "myArr：" & IsArray(myArr) & Chr(13) & _

"myVa1：" & IsArray(myVa1) & Chr(13) & _

"myVa2：" & IsArray(myVa2) & Chr(13) & _

"myStr：" & IsArray(myStr) & Chr(13) & _

"myNum：" & IsArray(myNum)

End Sub

IsArray 関数の使い方

【引数・戻り値】

IsArray 関数の使用例

サンプルVBAソース

実行結果