Cerca ne forum, è già stato risolto.
In tutti i casi l'istruzione chiave è "Line Input".
Direttamente da MSDN :
Istruzione Line Input #

Legge una singola riga in un file aperto ad accesso sequenziale e la assegna a unavariabileString.

Sintassi

Line Input #numerofile, nomevariabile

La sintassi dell'istruzione Line Input # è composta dalle seguenti parti:

Parte Descrizione
numerofile Obbligatoria. Qualsiasinumero di file valido.
nomevariabile Obbligatoria. QualsiasiVariant o nome di variabile String valido.


Osservazioni

I dati letti tramite Line Input # vengono in genere scritti su file con Print #.

L'istruzione Line Input # consente di leggere tutti i caratteri in un file un carattere per volta, fino al ritorno a capo (Chr(13)) o alla sequenza ritorno a capo–avanzamento riga (Chr(13) + Chr(10)). Le sequenze ritorno a capo–avanzamento riga vengono ignorate e non aggiunte alla stringa di caratteri.
Con esempio :
codice:
Dim TextLine
Open "FILEPROV" For Input As #1   ' Apre il file.
Do While Not EOF(1)   ' Ripete fino alla fine del file.
   Line Input #1, TextLine   ' Assegna la riga a una variabile.
   Debug.Print TextLine   ' Scrive nella finestra Immediata.
Loop
Close #1   ' Chiude il file.
Ciao,