Counting items in an array

[ajitpalsingh200]

How do i count the number of items in array

lets say i have declaration as below

DiscreteData = Array("MPN", "Vendor")

How do i count the items?

thankx in adavanc

 

[NickHK]

ajitpalsingh200,

Dim ArrayItemCount as Long
ArrayItemCount =UBound(DiscreteData)-LBound(DiscreteData)

NickHK

 

[Alan Beban]

ajitpalsingh200,

Dim ArrayItemCount as Long
ArrayItemCount =UBound(DiscreteData)-LBound(DiscreteData)

NickHK

The above works for a 1-based array; to allow for a 0-based or 1-based
array, substitute
ArrayItemCount =UBound(DiscreteData)-LBound(DiscreteData) + 1

Alan Beban

 

[Guest]

There is no built-in support for finding the dimensions of an array in VBA/VB
without prior knowledge of its rank (number of dimensions). The nearest
solution is to do it by trial and error.

 

[Rob van Gelder]

I have an example of how to determine number of dimensions in array on my
website "Number of Dimensions"

My routine trials until it errors - just as you say.

 

[Guest]

If you simply want the count of the number of elements in an array,
irrespection of the humber of dimensions it has, try:

Sub xy()

For Each ele In xx
cnt = cnt + 1
Next
End Sub

 

[Guest]

If you simply want the count of the number of elements in an array,
irrespection of the humber of dimensions it has, try:

Sub xy()
cnt = 0
For Each ele In YourArray
cnt = cnt + 1
Next
End Sub