[Resolvido]popular um array do zero

Ola a todos! ja procurei na internet e não encontrei.
Como faço para polupar um array do zero?

só existe exemplo de array já com as posições.

preciso colocar uma caixa de texto e lá no retorno da caixa imediate me dizer que os nomes estão sendo inseridos ou pela msgbox mesmo.

Sub arrayNomes()

Dim NOME(1 To 7) As String

For i = 1 To 7
NOME(i) = NOME(i) + ", " + txtNome
Debug.Print NOME(i)
Next i
End Sub

este código está com o array em branco,quando eu digito o nome para inserir ele preenche todas as posições.

quando eu digitar um nome deve ocupar apenas uma posição. quando eu digitar outro, deve ter o nome anterior e o atual que digitei, não posso em hipótese alguma usar tabela para isso.

Veja se o arquivo em anexo ajuda em como fazer. Desenvolvido e access 2010 - 32 bits

Código:

Dim Nome As Variant

Nome = Array()

'Cada vez que rodar o código abaixo o VBA inclui um novo elemento no final da Array e depois joga o valor de NovoNome
ReDim Preserve Nome(UBound(Nome) + 1)
Nome(UBound(Nome)) = NovoNome

tks.