redim en un procedimiento recursivo

[ebu]

hola buenas!
he creado un procedimiento recursivo donde tengo un array dinamico y segun vaya repitiendose el procedimiento quiero q se me vaya cargando.

Sub TraverseComponent()
Dim konfigMatrix() As String

'...
konfigMatrix = Component2.Configurations 'aqui se carga el array
For j = 1 To UBound(konfigMatrix)

en la primera vuelta me hara bien, pero en la segunda si quiero q me siga cargando el array desde donde lo ha dejado como lo pongo?y donde lo coloco?
Redim konfigMatrix (1 to UBound(konfigMatrix)) 'el caso es q no se el limite superior

para las proximas vueltas no tendria q poner:
Redim Preserve konfigMatrix() As String

gracias!