Importa ed accoda in EXCEL file TXT

Ciao forum,
nelle varie attività che svolgo per l’azienda in cui lavoro, una di esse è quella di trattare dei dati alfanumerici che mi vengono inviati giornalmente da un call center, via mail, in formato txt.

Da questi dati devo estrarre, periodicamente, i valori numerici e le date contenute per importarli in excel e poterli trattare matematicamente.

Considerato che al momento, ogni 10/15 giorni, eseguo l’operazione di import A MANO e per ogni file, prendendo spunto dalla macro di apoben64 al post “caricare RTF in Excel senza perdere allineamento colonne” vi chiedo se si può automatizzare l’importazione dei dati di diversi file TXT, contenuti ad esempio in una cartella dedicata, accodandoli in un unico foglio excel.

Ho provato con il registratore di macro ad eseguire i vari passaggi di apertura dei file, copia del contenuto e incolla nel foglio excel, ma non riesco a capire il codice che ne viene fuori per provare ad effettuare le opportune modifiche per l’automazione.

In pratica ci vorrebbe una macro che:

seleziona ed apre la cartella indicata;
indicizza i vari file txt;
apre il primo file;
copia il contenuto;
lo incolla nella cella A1 nel foglio1 di excel;
apre il secondo file;
copia il contenuto;
lo incolla X celle al di sotto di A1 nel foglio1 di excel;
apre il terzo file;
ecc ……………………
fino all’ultimo file.

Scusate la logorroicità ma credo fosse necessaria per cercare di essere il più chiaro possibile.

Grazie per l’attenzione

Ciao

T3T

Ciao Mario, diciamo che l'automazione tout court non si possa ottenere trattandosi di aprire comunque diversi file txt , senonchè potresti accodare in un unica macro il codice d'importazione con i vari percorsi ,che in esecuzione apre il file txt lo importa e così via.
Ovviamente sarà necessario che alla fine di ogni query si riparti dall'ultima cella occupata.
Personalemente l'ho provato e funziona, anche se la macro è palesamente lunga.
Fammi sapere ! Luca

[Modificato da APOBEN64 21/07/2006 10.24]

Ciao Luca,
se non ho capito male dovrei creare nella macro tanti codici di importazione quanti sono i file da importare.

Questo significa che ogni volta dovrei modificare nell’indirizzo tutti i nomi dei file da aprire e la loro quantità, e la cosa non è conveniente.

A questo punto snellisco il quesito:
si può fare una macro che legge i nomi dei file di una cartella e che li scriva poi in una colonna di excel?

Se questo è possibile potrei poi creare un ciclo for next in cui assegno ad una variabile il numero dei cicli (prelevato da un CONTA.VALORI dei file da importare) e ad un’altra variabile il nome corrispondente al file del ciclo (da inserire nell’indirizzo).
Poi, con un controllo dell’ultima cella occupata, assegnerei la posizione della cella attiva per l’incollamento del file successivo.

Purtroppo le mie capacità sono quelle che sono, le idee in testa ce l’ho (ammesso che siano praticabili), sono le cognizioni che mi mancano.

Un saluto

Mario

Ebbene sì , questa procedura la si può utilizzare per pochi file e con percorsi statici.
Per quanto attiene la possibilità di leggere i file, ho trovato interessante una lezione di ennius (mike), ti lascio il link, e può fare al caso tuo !
http://ennius.altervista.org/mike/procedure/mikevba081.htm

Ciao e fammi sapere , putroppo in questi giorni non ho molto tempo a disposizione , ma anche per me trovare una risposta al tuo quesito è importante.

Poi aspettiamo il supremo Salvatore ( detto anche By Sal) se ci illuminerà, come sempre !.

[Modificato da APOBEN64 21/07/2006 12.02]

Grazie per l'indicazione, purtroppo anche per me il tempo è tiranno, comunque mi attivo senz'altro e ti faccio sapere.


Ciao

Mario

Ciao Luca & Mario datemi un file text o rtf d'esempio con dati non sensibili e cosa volete che diventino in excel, oppure inviatemelo peer posta Ciao

ciao Apo e Sal.

Luca, ho visitato il link che mi hai segnalato e sono riuscito ad eseguire le macro indicate.

in effetti per funzionare funziona ma è troppo prolisso, ovvero per raggiungere l'obiettivo bisogna eseguire troppi passaggi in quanto lui ti porta ad estrarre i nomi dei file contenuti nella cartella interessata partendo dalla radice del disco e via via costruisce la stringa del percorso per arrivare alla lista dei file.

sarebbe molto più snello se la ricerca e l'estrazione la facesse unicamente nella cartella in cui risiede lo stesso file-programma xls alla pressione di un solo pulsante.

anche se dubito di riuscirci, proverò ad accorpare le istruzioni per fargli fare l'operazione nella sola cartella di residenza.

Salvatore, ti allego uno dei file TXT che mi pervengono dal quale mi interessa estrarre la data ed il numero di telefonate gestite.

anticipati ringraziamenti da

Mario

Ciao Mario, ti allungo questa semplice macrio che assegnata ad un pulsante ti permette di avere tutti i file presenti in una specifica cartella.

Adattata alle tue esigenze può esserti utile , ovviamente il formato è da cambiare in txt.

Ci sentiamo !


Sub Visiona()
cartella = "C:\Documents and Settings\Administrator\Documenti\"
r = 1
f = Dir(cartella & "*.xls") ' formato da cambiare


While f <> ""
r = r + 1
Cells(r, 1) = f
f = Dir
Wend


End Sub

[Modificato da APOBEN64 22/07/2006 9.40]

Ciao Luca,
se mi fossi collegato prima avrei risparmiato tempo.

Comunque rubando un paio d’ore alla mia giornata ho provato a modificare le macro del link di ennius che mi avevi suggerito e sono riuscito a fare quanto puoi vedere nell’allegato.


Di nuovo ciao e grazie

Mario

Ciao Mario e Luca, il detto By sal vi propone questo file, premetto che ho usato la macro del file di Mario ed una macro reperita in un'altro post del forum, adesso carica i nomi dei file ed esplode il file txt sul foglio Carico, adesso sono in panne perchè, ad ognuno serve un'elaborazione dei dati personale, puo darsi che ad uno gli serva una cosa ed un'altro una cosa diversa, per cui se mi indicate cosa si deve elaborare, sul terzo foglio, Elaborato, vi farei uscire il risultato. Ma ho bisogno di dati, bastano due tre righe di dati sensibili anche con dati fasulli e dirmi quale deve essere il risultato. vi saluto Salvatore. Ciao

Grazie sia a Mario che a Salvatore, in effetti le soluzioni indicate sono per le mie esigenze, salvo qualche personale modifica , tutte OK!!!

[Modificato da APOBEN64 24/07/2006 9.21]

[Modificato da APOBEN64 24/07/2006 9.22]

Ciao Salvatore,
diciamo che in qualche modo sono riuscito anch’io ad importare ed accodare automaticamente i file txt.

Come da te richiesto, ti allego un foglio che rappresenta il risultato dell’importazione e ciò che a fianco dovrei riuscire ad estrapolare (nell’esempio l’estrapolazione l’ho fatta a mano).

Ritengo che la difficoltà stia nel fatto che le stringhe di dati che si trovano nelle celle della colonna A evidenziati in blu, non sono tutte uguali.

Spero, non so come, sia possibile.

Un caldo, caldo, caldo saluto

Mario

Ciao Mario eccoti il file, adesso elabora le date ed il resto, basta premere elabora dopo aver caricato i file. Ciao

Manca il file

forse ci risei con i problemi telecom,
ti auguro proprio di no

ed io ci riprovo altrimenti dammi la tua email per mp penso che con la posta andrei meglio.

Ciao Salvatore, ho visionato il tuo file e volevo chiederti come potrei inserire anche un percorso che prevede il cd rom , visto che ho provato a richiamare il percorso , ma non mi prende niente.
Se invece la stessa modifica la faccio con la soluzione di Mario , mi funziona.
Grazie !

Vedo che ci siamo tutti !!!!!

Te la invio in ffz mail

Con l’occasione invio in allegato il file che ho creato e che non ho ancora terminato.

Credo comunque che la query mi dia dei problemi.

Vi spiego:
inizialmente il file pesa poche decine di Kb, però se lo mando in esecuzione e poi pulisco le celle, lo rieseguo e ripulisco le celle e così via più volte; quando, dopo l’ultima operazione PULISCI, vado a chiudere il file, excel, giustamente, mi chiede se voglio salvare le modifiche.

Facendo OK ed andando a vedere poi la dimensione del file è aumentata notevolmente, ed alle aperture successive risulta essere molto lento ed instabile.

Come mai?
Qualcuno sa quale può essere il motivo?
Può essere la query?

Ciao


Mario

Vedo che ci siamo tutti !!!!!

Te la invio in ffz mail

Con l’occasione invio in allegato il file che ho creato e che non ho ancora terminato.

Credo comunque che la query mi dia dei problemi.

Vi spiego:
inizialmente il file pesa poche decine di Kb, però se lo mando in esecuzione e poi pulisco le celle, lo rieseguo e ripulisco le celle e così via più volte; quando, dopo l’ultima operazione PULISCI, vado a chiudere il file, excel, giustamente, mi chiede se voglio salvare le modifiche.

Facendo OK ed andando a vedere poi la dimensione del file è aumentata notevolmente, ed alle aperture successive risulta essere molto lento ed instabile.

Come mai?
Qualcuno sa quale può essere il motivo?
Può essere la query?

Ciao


Mario

Vedo che ci siamo tutti !!!!!

Te la invio in ffz mail

Con l’occasione invio in allegato il file che ho creato e che non ho ancora terminato.

Credo comunque che la query mi dia dei problemi.

Vi spiego:
inizialmente il file pesa poche decine di Kb, però se lo mando in esecuzione e poi pulisco le celle, lo rieseguo e ripulisco le celle e così via più volte; quando, dopo l’ultima operazione PULISCI, vado a chiudere il file, excel, giustamente, mi chiede se voglio salvare le modifiche.

Facendo OK ed andando a vedere poi la dimensione del file è aumentata notevolmente, ed alle aperture successive risulta essere molto lento ed instabile.

Come mai?
Qualcuno sa quale può essere il motivo?
Può essere la query?

Ciao


Mario
ps internet fa i capricci oggi

Ciao Luca Mi sembra strano che non veda il CDrom comunque do un'occhiata al file, ho fatto poche modifiche al file di Mario.
Ciao Mario, non è la Query, è Excel che si comporta in quel modo che i file aumentano di peso, perchè anche se cancelli i dati per Excel risultano celle usate e quindi ecco il fatto di aumentare il peso, c'è un'articolo su Ennius che parla di questo problema, se riesco a trovare l'articolo te lo invio. Ciao

Stante un fatto e cioè che oggi non si riescono a scaricare gli allegati dal sito , in effetti dalla tua versione del file non si riesce a far leggere il cd-rom che nel mio caso è identificato con la lettera D: .

fanni sapere e un grazie Salvatore !

Ciao Luca in effetti c'era un Bug che ho risolto, non inseriva correttamente i dati in archivio. Ho fatto la prova a caricare dei dati dal CDrom dal mio disco "E" adesso li carica normalmente, una nota, il percorso del mio CDrom che ho inserito "e:\File xls" dove file xls è la directory non ho inserito la "\" finale altrimenti la macro "mostra" di Mario me la duplica in questo modo "e:\File xls\\" ma non credo che sia questo il problema, ho fatto in modo che i dati siano in maiuscolo.
Be comunque prova, attenzione che il tasto Elabora, scrive i dati come li vuole Mario, quindi per te devi modificare il tipo di elaborazione se è diversa. Ciao Ecco il file Spero: comunque credo che sia il server di appoggio del forum che da problemi di caricamento e scaricamento, e non Telecom come credevo prima, perchè con altri server non mi da lo stesso problema. Riciao

Ciao Luca in effetti c'era un Bug che ho risolto, non inseriva correttamente i dati in archivio. Ho fatto la prova a caricare dei dati dal CDrom dal mio disco "E" adesso li carica normalmente, una nota, il percorso del mio CDrom che ho inserito "e:\File xls" dove file xls è la directory non ho inserito la "\" finale altrimenti la macro "mostra" di Mario me la duplica in questo modo "e:\File xls\\" ma non credo che sia questo il problema, ho fatto in modo che i dati siano in maiuscolo.
Be comunque prova, attenzione che il tasto Elabora, scrive i dati come li vuole Mario, quindi per te devi modificare il tipo di elaborazione se è diversa. Ciao Ecco il file Spero: comunque credo che sia il server di appoggio del forum che da problemi di caricamento e scaricamento, e non Telecom come credevo prima, perchè con altri server non mi da lo stesso problema. Riciao

Come vedi non ci si riesce riprovo

Buongiorno Salvatore,
come mi hai chiesto ieri ti ho inviato via ffz mail i miei indirizzi telematici (non so se li hai ricevuti).

Se vuoi, prova ad inserirmi l'allegato via mail.

grazie, ciao

Mario

Si Mario li ho ricevuti adesso provo prima qua, per tutti, e poi vedo di spedirti il file Ciao

Ciao Sal,
ho appena scaricato e provato l'allegato e.....cosa dire, è pressochè fantastico. (non poteva essere altrimenti)

Esegue alla perfezione le operazioni richieste.

Con più calma cercherò di studiarmi il codice per capire come hai operato per estrarre i dati voluti (visto che le stringhe da trattare non erano tutte uguali).

Ancora grazie

Mario

Ciao , non capisco perchè non riesco a interagire col cd rom !
Anche l'ultimo file di Salvatore non mi permette di leggere il contenuto del D:\ o E:\. Può dipendere dal mio computer ?
Un grazie per i suggerimenti , è una cosa Molto strana.

Ciao Luca,
ho provato il lavoro di Salvatore anche sul mieo lettore dvd e sul masterizzatore dvd (F: e G:) e funziona.

Controlla se nel tuo percorso di ricerca ci sono file o se ci sono solo cartelle.

Ciao

Mario