numelem = ubound(AllCatogary) - lbound(AllCatogary) + 1

If you want to loop through the array

for i = lbound(AllCatogary) to Ubound(AllCatogary)
debug.print, i, AllCatogary(i)
Next i

--
Regards,
Tom Ogilvy

"Mits" wrote in message
...
Hi,

I am little new VB programing, espcially in excel. So I need little
help finding the funcation. I have array as following.

AllCatogary = Array("Index", "Date", "Time", "Operator Name", _
"Output File Name", TextBox1.Value,
TextBox2.Value)

Is there a function would tell me number of element are in 'AllCatogary'
array?

In above case it is easy, 7 element, but when I run the code, the size of
my array changes, so I like to know if there a function i can call to get
the size of array at that point.

Thank You,
Mits.