Visual Basic para Aplicaciones - Almacenar en un vector

Hola, me gustaría saber como se almacena en un vector del tipo vector(i)
Es para abrir archivos que empiezen igual.
Si hago dir("c:\1*.xls) para los archivos que empiezen por 1. Como hago para almacenar el resultado en un vector?
Saludos y Gracias de antemano.
Sergi

Hace esto

dim vector as string
dim cuenta as byte
diim indice as byte

cuenta=0
while dir ("C:\1*.xls") <> ""
cuenta=cuenta+1
wend
redim vector(cuenta)
vector(0)=dir("C:\1*.xls")
indice=0
while vector (indice)<> ""
indice=indice+1
vector(indice)=dir("C:\1*.xls")
wend
for cuenta=0 to indice
workbook.open filename:=vector(cuenta)
next

Cualquir cosa escribime

Genial! Muchas Gracias por la respuesta. No había trabajado aún con vectores y me ha servido mucho tu respuesta!
Graciassssss!