E' possibile attraverso visual basic prelevare, un file di testo esportarlo in exel, in maniera automatica?ossia quando io premo un determinato tasto, esegue le operazioni sopra citate.
L'operazione descritta sopra è stata fatta manualmente, ma visto che sono molti file non è possibile.
Potete darmi un aiuto?
gradito un esempio o dove posso andare a vedere.
.... ma i files di testo sono formattati in un certo modo, o sono testi a caso ...?
you'll never walk alone ....
In effetti si presentano su una riga sotto l'altra, in maniera ordinata.
questo è l'esempio.
date ora citta percorso
02/06/02 14.20 roma www.esempio.it
02/06/02 14.20 roma www.esempio.it
02/06/02 14.20 roma www.esempio.it
02/06/02 14.20 roma www.esempio.it
I dati si presentano cosi.
Il file si presenta cosi.
Importandolo in exel, o in access non faccio altro che suddividere i dati, in campi in maniera ordinata.
.... spero che il file sia un txt ... vero?
you'll never walk alone ....
Comunque ..... Prima di tutto devi aprire il file:
Dim contenuto as string
Dim miadata as date
‘Apre il file
Open "c:\.........." For Input As #1
‘Attribuisce alla variabile ‘contenuto‘ il contenuto della prima riga
Line Input #1, contenuto
‘Adesso in contenuto abbiamo la prima riga.... quindi mediante le funz mid(), instr() o altre puoi estrarti data, ora, città, percorso.........visto che i campi hanno intervalli regolari... (così mi hai detto)
es. : per estrarre la data fai così: miadata=mid(contenuto,1,8).
Nello stesso modo estrai le altre variabili.....
Adesso non dobbiamo far altro che cacciare le nostre variabili in un database ...... ohps! Dimenticavamo di chiudere il file: “Close #1”
NB: Questo vale per la prima riga....... per estrarre le variabili di tutte le righe devi eseguire un ciclo fino alla fine del file che hai aperto....... e per ogni ciclo creare un nuovo record del databbbase.
Spero di essere stato chiaro. DOMANDE?:quote:
you'll never walk alone ....
Si è un file di testo.
Permessi di invio
Rispondi quotando