Any tip to test the lenght of an array ?


nLenArray = 100
nColArray = 4
Redim tSociety(nLenArray,nColArray)

For x = 1 to nLenArray
For j = 1 to nColArray
next
next


Why not possible
for x = 1 to len(tSociety()) or something similar?

I think you're referring to dimensions. Look at the LBound and UBound
functions.

--

Vasant

"JMG" wrote in message
oups.com...
Any tip to test the lenght of an array ?


nLenArray = 100
nColArray = 4
Redim tSociety(nLenArray,nColArray)

For x = 1 to nLenArray
For j = 1 to nColArray
next
next


Why not possible
for x = 1 to len(tSociety()) or something similar?

The UBound function does just what you want. UBound(tSociety,1) gives the
first dimension, UBound(tSociety,2) gives the second.

"JMG" wrote:

Any tip to test the lenght of an array ?


nLenArray = 100
nColArray = 4
Redim tSociety(nLenArray,nColArray)

For x = 1 to nLenArray
For j = 1 to nColArray
next
next


Why not possible
for x = 1 to len(tSociety()) or something similar?

UBound(tSociety) - LBound(tSociety) + 1 to get the length

For x = LBound(tSociety) To UBound(tSociety)

to loop through it

--
HTH

Bob Phillips

"JMG" wrote in message
oups.com...
Any tip to test the lenght of an array ?


nLenArray = 100
nColArray = 4
Redim tSociety(nLenArray,nColArray)

For x = 1 to nLenArray
For j = 1 to nColArray
next
next


Why not possible
for x = 1 to len(tSociety()) or something similar?