generating a count of items in an array

I have an array (shown below as "varArr") in which a macro searches for terms
in the array ("text1", etc.) with a while statement. I occasionally add or
delete a term from the array. Is there any way of using UBound or something
else, to pick up the quantity of terms to be used in the array, so that I can
use a variable for that quantity instead of hard-coding it each time I add or
delete a term from the list?

varArr = Array("text1", "text2", "text3", "text4")
While intCnt < 5
~~

--
Bryan

Jezebel
Tue Aug 01 03:41:32 CDT 2006

For intCnt = lBound(varArr) to uBound(varArr)
...
or

intCnt = lBound(varArr)
Do
..
Loop until intCnt > uBound(varArr)

Don't use For ... Next if you add or remove items within the loop.


If you do a lot of this sort of thing, you might find it easier to work with
a collection.






"muyBN" <muyBN@discussions.microsoft.com> wrote in message
news:4789A58A-2F25-402E-AA54-82C702AD70B9@microsoft.com...
>I have an array (shown below as "varArr") in which a macro searches for
>terms
> in the array ("text1", etc.) with a while statement. I occasionally add or
> delete a term from the array. Is there any way of using UBound or
> something
> else, to pick up the quantity of terms to be used in the array, so that I
> can
> use a variable for that quantity instead of hard-coding it each time I add
> or
> delete a term from the list?
>
> varArr = Array("text1", "text2", "text3", "text4")
> While intCnt < 5
> ~~
>
> --
> Bryan

Michael
Wed Aug 02 07:57:28 CDT 2006

On Tue, 1 Aug 2006 01:11:02 -0700, muyBN wrote in
microsoft.public.word.vba.general:

>I have an array (shown below as "varArr") in which a macro searches for terms
>in the array ("text1", etc.) with a while statement. I occasionally add or
>delete a term from the array. Is there any way of using UBound or something
>else, to pick up the quantity of terms to be used in the array, so that I can
>use a variable for that quantity instead of hard-coding it each time I add or
>delete a term from the list?
>
>varArr = Array("text1", "text2", "text3", "text4")
>While intCnt < 5
>~~

Your code fragment is very terse to allow deduction of what you want to
do. However, in addtion to Jezebel's example of how to use
LBound/UBound, you can also try this construct:

Dim varElement as Variant
For Each varElement In varArray
Debug.Print varElement
Next varElement

--
Michael Bednarek http://mbednarek.com/ "POST NO BILLS"