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?