Dimming Error

[squirrelly1]

When I execute the following code:

Dim NumFiles As Integer
NumFiles = List1.ListCount
Dim Files(NumFiles) As Integer

I get:

Error: Constant Expression Required

Why???

[jim mcnamara]

Dim Files() as Integer
...
Redim Files(NumFiles)

[nishantp]

You can't give variable bounds to a fixed-length array. Use a dynamic array instead:

Dim NumFiles As Integer
NumFiles = List1.ListCount
Dim Files() As Integer
ReDim Files(NumFiles)

[nishantp]

Dammit! got beat again