Vedi se con questo codice ottieni il risultato sperato. 
Per quanto riguarda le guide online non saprei cosa consigliarti. Non conosco nessun sito che meriti più di altri. Man mano che mi si presenta un problema mi aiuto con la generazione automatica delle macro e poi con il fido google.
Personalmente ho iniziato ad usare il vba relativo ad excel solo da poco perchè costretto da esigenze lavorative e ho acquistato un manualetto dei miti mondadori a pochi euro. Ora sono in ufficio e non ricordo il titolo esatto. Nel caso ti interessi ti dico il titolo stanotte.
Personalmente trovo molto utile questo forum in inglese
http://www.vbforums.com/
nella sezione office development trovi tante discussioni interessanti e gente molto preparata.
codice:
Sub copiatxt()
'recupero il valore dell'ultima riga contenente qualcosa nella colonna A
ultima = ActiveSheet.Cells(ActiveSheet.Rows.Count, "A").End(xlUp).Row
Set fso = CreateObject("Scripting.FileSystemObject")
'passo il percorso del mio file di testo
Set file = fso.OpenTextFile("C:\Documents and Settings\...\tuofile.txt", 1, -2)
k = 0
i = ultima + 1 'setto l'indice della riga da cui iniziare a scrivere, pari al numero dell'ultima riga già occupata + 1
Do While Not file.AtEndOfStream 'ciclo il mio file di testo
riga = file.ReadLine 'recupero il contenuto di ciascuna riga
valori = Split(riga, ",")
For Each valore In valori
ActiveSheet.Cells(i, 1).Offset(0, k).Value = valore
k = k + 1
Next valore
k = 0
i = i + 1 '.. e incremento il contatore
Loop
file.Close
'libero le risorse
Set file = Nothing
Set fso = Nothing
End Sub
@patel: troppo buono ma grazie lo stesso. Ah, comunque dilettante. 
Rispondi quotando
