String Array with variable size 1

[jhogie]

This seems simple, but I can't figure it out, and I couldn't find in another forum. Below is my simplified code. I want to create an array ('Tag') that will contain string variables. The array should be the size of 'TagCount' (ie. 10).

I get the error "Constant Expression Required"

Sub test()
Dim TagCount As Integer
TagCount = 10
Dim Tag(TagCount) As String
End Sub

Any help would be much appreciated. Thanks for taking a look,

- JHogie

 

[gmmastros]

You need to dimension the variable without a size and then Redim it to the size you want.

Sub test()

  Dim TagCount As Integer
  TagCount = 10

  Dim Tag() As String
  Redim Tag(TagCount-1)

End Sub

By default, arrays start at zero, so if you want 10 elements, you need to redim the array to 9.

Make sense?

-George

"The great things about standards is that there are so many to choose from." - Fortune Cookie Wisdom

 

[HughLerwill]

>so if you want 10 elements, you need to redim the array to 9

or use a non zero based array;

Redim Tag(1 To TagCount)

 

[jhogie]

I did know that arrays start at zero. But I really like the trick for redimensioning the variable... it did the trick, THANKS

 

[Error7]

But if you know the size of the array why not just declare it as Dim Tag(9) As String


[gray]Experience is something you don't get until just after you need it.[/gray]

 

[jhogie]

I simply posted a simplified version of my module. In my ACTUAL program it is not 10 (or 9), it IS a variable.

It is a legitamate question. Thanks for posting.

 

[vb5prgrmr]

For further info

Option Base 1

Press F1-Index tab-Option Base statement

or of undetermined number of elements use LBound and UBound