size of array vba code example

Example 1: vba array length

Dim YourArray
YourArray = Array("a", "b", "c")
Debug.Print UBound(YourArray) - LBound(YourArray) + 1

Example 2: vba array dimensions

Public Function ArrayDimensions(ByRef Arr As Variant) As Integer
    Dim indDim As Integer
    Dim result As Integer
    On Error Resume Next
    Do
        indDim = indDim + 1
        result = UBound(Arr, indDim)
    Loop Until err.Number <> 0
    ArrayDimensions = indDim - 1
End Function

Tags:

Vb Example

Related