Dim ary, i

ReDim ary(1 To 5)
For i = 1 To 5
ary(i) = i
Next i
MsgBox ary(5)

ReDim Preserve ary(1 To 6)
ary(6) = 6
MsgBox ary(5)
MsgBox ary(6)

--
HTH

Bob Phillips

"Piotr" wrote in message
...
Hi
How can I change the size of array in VBA ?
Is it possible to change static array or dynamic array ?
Please, help me.

THANKS !

Best regards,
Piotr