配列の最大・最小要素番号を取得する

今回は配列の要素番号を取得についてメモしておきます。

配列の要素数分、ループする時などに必要になります。

配列の最大要素番号を取得するにはUBound関数を使います。
配列の最小要素番号を取得するにはLBound関数を使います。

実行プログラム

Sub Sample3_5_1()
 
    Dim varArray As Variant
    Dim i        As Integer
 
    varArray = Split("日,月,火,水,木,金,土", ",") ' カンマ区切りで配列に格納
    
    MsgBox "最小要素番号：" & LBound(varArray) & vbCrLf & _
           "最大要素番号：" & UBound(varArray)
 
End Sub

Sub Sample3_5_1()

Dim varArray As Variant

Dim i As Integer

varArray = Split("日,月,火,水,木,金,土", ",") ' カンマ区切りで配列に格納

MsgBox "最小要素番号：" & LBound(varArray) & vbCrLf & _

"最大要素番号：" & UBound(varArray)

End Sub

実行結果