Hi gtmelony,

The following works for me:
Dim nSize As Integer, nArray()
nSize = 4
ReDim nArray(nSize)