Inserir dados do arquivo TXT no Excel

[Abel_citron]

Bom dia pessoal,

Se vocês puderem me ajudar, eu tenho um arquivo txt da seguinte forma:

DataVencto Valor

01/03/2010 1.000,00

02/03/2010 1.500,00

03/03/2010 800,00

Gostaria de saber se a partir de um arquivo .TXT neste formato eu poderia transportá-lo para o Excel via VBA, eu sei fazer em Word mas em excel não consegui achar em minhas pesquisas. se vocês puderem me ajudar.

Sem mais,

Abel_citron.

[raphael_suporte]

hum, creio que sua dificuldade tá em "quebras" as informações

Para ler, e ficar mais fácil de manipular os arquivos depois vamos colocar tudo em um vetor usando o seguinte comando

arq = "c:\arquivo.txt"
        
        n = FreeFile()
        Open arq For Input As #n
        conteúdo = Input(LOF(n), n)
        Close #n
        
        linhas = Split(conteúdo, vbCrLf)
        
        msgbox linhas 'só para exibir como ficou seu vetor

e para inserir no execel de acordo com sua necessidade, aconselho dar uma lida nesse tutorial