Allego file creato con la tua macro:
http://www.megaupload.com/?d=CVWQGW4Z
Grazie
Francesco
Moderatori: Anthony47, Flash30005
Sub Leggi_Line_Input()
File_Inp = "D:\Test.txt"
Open File_Inp For Input As #1
Do Until EOF(1)
I = I + 1
' Legge con "LINE INPUT"
Line Input #1, Dati
Sheets("Foglio1").Cells(I, 1) = "---" & Dati & "+++" ' <<--------- i "---" e i "+++" servono solo a capire quanto inizia e quando finisce la tua "Riga"
Loop
Close
End Sub
Torna a Applicazioni Office Windows
Excel: formula automatica per evidenziare prodotto scaduto Autore: gamma_ray |
Forum: Applicazioni Office Windows Risposte: 3 |
Salvare file excel in formato html escludendo le immagini Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 6 |
formula excel non visualizza risultato Autore: tommasog |
Forum: Applicazioni Office Windows Risposte: 6 |
Excel 2016 - Funzione SCARTO + INDIRETTO Autore: pl1957 |
Forum: Applicazioni Office Windows Risposte: 2 |
Inserimento dati su tabella da codice a barre Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 80 |
Visitano il forum: Nessuno e 56 ospiti