{"id":183,"date":"2017-05-16T15:31:31","date_gmt":"2017-05-16T15:31:31","guid":{"rendered":"https:\/\/www.torgian.com\/?page_id=183"},"modified":"2018-04-27T22:38:54","modified_gmt":"2018-04-27T22:38:54","slug":"read-ascii-files-microsoft-excel-macro","status":"publish","type":"page","link":"https:\/\/www.torgian.com\/it\/read-ascii-files-microsoft-excel-macro\/","title":{"rendered":"Microsoft Excel Macro Read ASCII Files"},"content":{"rendered":"

<\/p>\n

READ ASCII FILES MACRO v. 2.1 – 27\/02\/01 – By Gianpiero Torello<\/h2>\n

Questa macro legge un file di testo in un foglio Excel.<\/p>\n

Il file pu\u00f2 essere in uno dei seguenti formati: CSV, Campi separati da tabulatori o Lunghezza fissa.<\/p>\n

All’inizio ho scritto questa macro principalmente per leggere i miei indirizzi esportati da Lotus Organizer. Volevo stampare tutti i miei indirizzi in formato tabella con tutti i numeri di telefono nella stessa colonna e gli indirizzi, fax e emails condensati. Per ottenere questo risultato dovevo lavorare parecchio tutte le volte che volevo aggiornare il mio indirizzario, cos\u00ec ho pensato di aggiungere la possibilit\u00e0 di inserire dei campi calcolati mentre leggo il file di testo. Pu\u00f2 sembrare strano ma se date un’occhiata all’esempio sar\u00e0 chiaro.<\/p>\n

Si pu\u00f2 usare questa macro per qualsiasi file di testo che si abbia bisogno di leggere ripetutamente e sul quale si debbano applicare lunghe e noiose formule e\/o formattazioni.<\/p>\n

Si possono anche ricodificare alcuni o tutti i contenuti dei campi.<\/p>\n

Ma parliamo subito dell’esempio. Nota: la tabella sottoriportata \u00e8 solo esemplificativa e non \u00e8 completa. Cliccare qui per scaricare la versione completa della documentazione in formato MS Word.<\/a><\/p>\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n
Load Field<\/b><\/i><\/td>\nField Name<\/b><\/i><\/td>\nOffset<\/b><\/i><\/td>\nLength<\/b><\/i><\/td>\nRecoding<\/b><\/i><\/td>\nFormat<\/b><\/i><\/td>\nFunction<\/b><\/i><\/td>\n<\/tr>\n
<\/td>\nConfidential<\/td>\n<\/td>\n<\/td>\n<\/td>\n00<\/td>\n<\/td>\n<\/tr>\n
Yes<\/td>\nCategories<\/td>\n<\/td>\n<\/td>\nCAT<\/td>\n@<\/td>\n<\/td>\n<\/tr>\n
Yes<\/td>\nFirstname<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
Yes<\/td>\nLastname<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nTitle<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nJobtitle1<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
Yes<\/td>\nCompany1<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nWork1street<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nWork1city<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nWork1state<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nWork1zip<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nWork1country<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
<\/td>\nWork1tel<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/tr>\n
…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n<\/tr>\n
Calc<\/td>\nTel<\/td>\n<\/td>\n<\/td>\n<\/td>\n<\/td>\nIF(“WORK1TEL”<>””,”W1: “&”WORK1TEL”&” “,””)&IF(“WORK2TEL”<>””,”W2: “&”WORK2TEL”&” “,””)&IF(“WORK3TEL”<>””,”W3: “&”WORK3TEL”&” “,””)&IF(“HOME1TEL”<>””,”H1: “&”HOME1TEL”&” “,””)&IF(“HOME2TEL”<>””,”H2: “&”HOME2TEL”&” “,””)&IF(“HOME3TEL”<>””,”H3: “&”HOME3TEL”&” “,””)&IF(“CARTEL”<>””,”C: “&”CARTEL”&” “,””)&IF(“MOBILETEL”<>””,”M: “&”MOBILETEL”&” “,””)&IF(“PAGERTEL”<>””,”P: “&”PAGERTEL”&” “,””)&IF(“SCHOOLTEL”<>””,”S: “&”SCHOOLTEL”&” “,””)&IF(“OTHERTEL”<>””,”O: “&”OTHERTEL”&” “,””)&IF(“ISDNTEL”<>””,”I: “&”ISDNTEL”&” “,””)<\/td>\n<\/tr>\n
…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n…<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n

 <\/p>\n

Il primo campo “Confidential” \u00e8 un numerico e voglio che sia formattato a zeri quindi scrivo “00” nella colonna Format. Questo \u00e8 il modo nel quale Excel definisce questo tipo di formato. \u00c8 solo un esempio perch\u00e9, come si pu\u00f2 vedere, la colonna “Load Field” non contiene “Yes”, quindi non verr\u00e0 caricata nel foglio Excel.<\/p>\n

Il secondo campo “Categories” sar\u00e0 formattato a Testo (@) e il suo contenuto ricodificato secondo la tabella contenuta nel foglio Recoding, che sar\u00e0 simile alla seguente:<\/p>\n\n\n\n\n\n
Code<\/b><\/i><\/td>\nOriginal Value<\/b><\/i><\/td>\nRecode To<\/b><\/i><\/td>\n<\/tr>\n
CAT<\/td>\nPersonal<\/td>\nPERSONAL<\/td>\n<\/tr>\n
CAT<\/td>\nPUBLIC<\/td>\nPERSONAL<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n

Questo significa che se il campo “Categories” contiene Personal o PUBLIC, la macro lo tradurr\u00e0 in PERSONAL. Qualsiasi altro valore rimarr\u00e0 invariato.<\/p>\n

Ed ora veniamo agli ultimi campi:<\/p>\n

Il campo “Tel” ha “Calc” nella colonna “Load Field”. Questo vuol dire che non sar\u00e0 caricato dal file ma la macro inserir\u00e0 la formula Excel contenuta nella colonna “Formula”.<\/p>\n

IF(“Work1tel”<>””,”W1: “&”Work1tel”&” “,””)&IF(“Work2tel”<>””,”W2: “&”Work2tel”&” “,””)&IF(“Work3tel”<>””,”W3: “&”Work3tel”&” “,””)&IF(“Home1tel”<>””,”H1: “&”Home1tel”&” “,””)&IF(“Home2tel”<>””,”H2: “&”Home2tel”&” “,””)&IF(“Home3tel”<>””,”H3: “&”Home3tel”&” “,””)&IF(“Cartel”<>””,”C: “&”Cartel”&” “,””)&IF(“Mobiletel”<>””,”M: “&”Mobiletel”&” “,””)&IF(“Pagertel”<>””,”P: “&”Pagertel”&” “,””)&IF(“Schooltel”<>””,”S: “&”Schooltel”&” “,””)&IF(“Othertel”<>””,”O: “&”Othertel”&” “,””)&IF(“Isdntel”<>””,”I: “&”Isdntel”&” “,””)<\/p>\n

La formula sopra riportata concatena semplicemente tutti i numeri di telefono che non sono vuoti in un’unica cella.
\nMa perch\u00e9 contiene “Work1tel”? Perch\u00e9 Work1tel non sar\u00e0 caricato nel foglio Excel in quanto non sarebbe accessibile ad una formula. Invece, la macro rimpiazzer\u00e0 “Work1tel” con il suo effettivo contenuto. Si notino i doppi apici: se si tratta un campo come testo, questi sono necessari. E si deve ricordare che le lettere maiuscole e minuscole sono trattate diversamente quindi deve corrispondere esattamente al nome dato nella colonna “Field Name” (“WORK1TEL” non funzionerebbe).<\/p>\n

Se si vuole indirizzare una cella Excel dinamicamente, si utilizzi il modo di riferimento R1C1 altrimenti si finirebbe per puntare sempre alla stessa cella. Cos\u00ec, per esempio, per rimuovere l’ultimo trattino dalla cella alla sinistra, la formula sar\u00e0:<\/p>\n

IF(RIGHT(rc[-1],3)=” – “,LEFT(rc[-1],LEN(rc[-1])-3),rc[-1])<\/p>\n

Infine, quando si esegue la macro, verra’ chiesto di inserire il numero del foglio dove si trova il modello soprastante. Questo e’ il numero del foglio all’interno del workbook corrente. Quando si esegue la macro, quindi, il foglio contenente il modello deve essere aperto ed attivo. I dati verranno letti in un nuovo foglio.<\/p>\n

Fare click qui per scaricare la versione 2.2.1 della macro.<\/a><\/p>\n

Faree click qui per scaricare la versione in MS Word di questo documento.<\/a><\/p>","protected":false},"excerpt":{"rendered":"

READ ASCII FILES MACRO v. 2.1 – 27\/02\/01 – By Gianpiero Torello Questa macro legge un file di testo in un foglio Excel. Il file pu\u00f2 essere in uno dei seguenti formati: CSV, Campi separati da tabulatori o Lunghezza fissa. All’inizio ho scritto questa macro principalmente per leggere i miei\u2026<\/p>\n

Continue reading<\/span><\/i><\/a> <\/p>\n","protected":false},"author":1,"featured_media":0,"parent":0,"menu_order":0,"comment_status":"open","ping_status":"closed","template":"","meta":{"footnotes":""},"class_list":["post-183","page","type-page","status-publish","hentry"],"jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/P8oMzr-2X","jetpack-related-posts":[{"id":189,"url":"https:\/\/www.torgian.com\/it\/utilities\/","url_meta":{"origin":183,"position":0},"title":"Utilit\u00e0","author":"torgian","date":"16 maggio 2017","format":false,"excerpt":"Al momento potete trovare MultiTouch, un programma Windows per modificare le date di file e cartelle, e una macro MS Excel per Leggere i file ASCII. Quest'ultima l\u2019ho scritta principalmente per caricare in Excel e stampare i miei contatti del Lotus Organizer ma \u00e8 uno strumento di uso generico. \u00c8\u2026","rel":"","context":"Articolo simile","block_context":{"text":"Articolo simile","link":""},"img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":416,"url":"https:\/\/www.torgian.com\/it\/qif-converter-online-help\/","url_meta":{"origin":183,"position":1},"title":"Guida In linea di QIF Converter","author":"torgian","date":"14 settembre 2018","format":false,"excerpt":"\u00a0 \u00a0 Guida in linea di QIF Converter per la Versione 1.3.0 \u00a0 Indice Introduzione Menu principale Utilizzo di QIF Converter Note sulla versione I. Introduzione Questo programma \u00e8 gratuito sia per uso privato sia pubblico. Potete ridistribuirlo, nella sua interezza, ma senza richiedere un compenso. Questo programma viene distribuito\u2026","rel":"","context":"Articolo simile","block_context":{"text":"Articolo simile","link":""},"img":{"alt_text":"Dollar sign","src":"https:\/\/i0.wp.com\/www.torgian.com\/wp-content\/uploads\/2018\/09\/dollar-transparent.png?resize=350%2C200&ssl=1","width":350,"height":200},"classes":[]},{"id":453,"url":"https:\/\/www.torgian.com\/it\/qif-converter\/","url_meta":{"origin":183,"position":2},"title":"QIF Converter","author":"torgian","date":"15 settembre 2018","format":false,"excerpt":"Una nuova versione di questo semplice ma utile strumento \u00e8 arrivata. Per chi ha usato la versione precedente, QIF Converter 1.3.0 porta parecchi cambiamenti. A parte la grafica della IU, potete ora specificare fino a cento sotto-transazioni, tutti i tag vengono ora importati e ci sono anche correzioni di alcuni\u2026","rel":"","context":"Articolo simile","block_context":{"text":"Articolo simile","link":""},"img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":266,"url":"https:\/\/www.torgian.com\/it\/multitouch-online-help\/","url_meta":{"origin":183,"position":3},"title":"Guida In linea di MultiTouch","author":"torgian","date":"21 febbraio 2018","format":false,"excerpt":"\u00a0 Guida in linea di MultiTouch\u00a0 per la Versione 1.0.0.4 \u00a0 Indice Introduzione Menu principale Punto 1 - Elementi da modificare Punto 2 - Sincronizzazione Punto 3 - Cambia le date della destinazione con... Punto 4 - Seleziona File\/Cartelle Punto 5 - Seleziona File\/Cartelle Punto 6 - Cambia le date\u2026","rel":"","context":"Articolo simile","block_context":{"text":"Articolo simile","link":""},"img":{"alt_text":"MultiTouch Icon","src":"https:\/\/i0.wp.com\/www.torgian.com\/wp-content\/uploads\/2018\/01\/Changing-Dates-Calendar.png?resize=350%2C200&ssl=1","width":350,"height":200},"classes":[]},{"id":186,"url":"https:\/\/www.torgian.com\/it\/multitouch\/","url_meta":{"origin":183,"position":4},"title":"MultiTouch","author":"torgian","date":"16 maggio 2017","format":false,"excerpt":"MultiTouch \u00e8 un programma per Windows che permette di cambiare le date di creazione, modifica e ultimo accesso dei file e delle cartelle. Si possono impostare le date dei file\/cartelle con la data di sistema, una specifica data e ora o con le date di file memorizzati in altre cartelle.\u2026","rel":"","context":"Articolo simile","block_context":{"text":"Articolo simile","link":""},"img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]},{"id":378,"url":"https:\/\/www.torgian.com\/it\/privacy-policy\/","url_meta":{"origin":183,"position":5},"title":"Privacy Policy","author":"torgian","date":"28 maggio 2018","format":false,"excerpt":"Who we are Our website address is: https:\/\/www.torgian.com. What personal data we collect and why we collect it Comments When visitors leave comments on the site we collect the data shown in the comments form, and also the visitor\u2019s IP address and browser user agent string to help spam detection.\u2026","rel":"","context":"Articolo simile","block_context":{"text":"Articolo simile","link":""},"img":{"alt_text":"","src":"","width":0,"height":0},"classes":[]}],"_links":{"self":[{"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/pages\/183","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/pages"}],"about":[{"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/types\/page"}],"author":[{"embeddable":true,"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/comments?post=183"}],"version-history":[{"count":4,"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/pages\/183\/revisions"}],"predecessor-version":[{"id":192,"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/pages\/183\/revisions\/192"}],"wp:attachment":[{"href":"https:\/\/www.torgian.com\/it\/wp-json\/wp\/v2\/media?parent=183"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}