Vba len variant

Public Function ArrayLen(arr As Variant) As Long
    If IsEmpty(arr) Then
        ArrayLen = 0
    Else
        ArrayLen = UBound(arr) - LBound(arr) + 1
    End If  
End Function

Similar codes

22 votes464 views1 answer
Excel vba check if directory exists
VBA
18 votes496 views2 answers
Vba make word from bytes
VBA
0 vote330 views1 answer
Vba static variable
VBA
3 votes358 views1 answer
Extract word in a text in excel
VBA
1 vote334 views1 answer
Set font for ms chart vb.net
VBA
0 vote325 views1 answer
Search combobox items vb.net
VBA
0 vote296 views1 answer
Putting marquee in vb.net
VBA
5 votes328 views1 answer
Xl vba double quotes in string literal
VBA
0 vote322 views1 answer
Excel protect cells with formulas
VBA
1 vote319 views1 answer
VBA Loop through recordset
VBA