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

2 votes229 views1 answer
Excel vba check if string entirely numeric
VBA
0 vote215 views1 answer
Change whcih control a user has selected vb
VBA
0 vote225 views1 answer
Afficher un message d'erreur vba
VBA
0 vote214 views1 answer
Show unix time in vba
VBA
8 votes286 views1 answer
Vba convert 2 bytes to an integer
VBA
0 vote214 views1 answer
Vb check if row has column
VBA
1 vote228 views1 answer
Vbs run
VBA
0 vote259 views1 answer
Filesystemobject vba reference
VBA
0 vote227 views1 answer
Vba copy file
VBA
0 vote232 views1 answer
Freeze panes vba
VBA